In Study 1, adults with strong religious commitments and faith practices were interviewed in depth about their spiritual experiences and their understanding of the mind by experienced ethnographers. These interviews yielded one measure of porosity (“Porosity Vignettes”), one measure of absorption (the Absorption scale), and one measure of spiritual experience (“Spiritual Events” scale).

This notebook contains all of the analyses for Study 1 (revised July 2020).

source("../scripts_general/dependencies.R")
package ‘ggplot2’ was built under R version 4.0.2package ‘tibble’ was built under R version 4.0.2package ‘dplyr’ was built under R version 4.0.2package ‘stargazer’ was built under R version 4.0.1package ‘kableExtra’ was built under R version 4.0.2package ‘htmltools’ was built under R version 4.0.2package ‘svglite’ was built under R version 4.0.2
source("../scripts_general/custom_funs.R")
source("../scripts_general/var_recode_contrast.R")
source("../scripts_general/data_load.R")
# get item-level question
d1_byq <- read_csv("./data_byquestion/study1_byquestion.csv")
Parsed with column specification:
cols(
  .default = col_double(),
  study = col_character(),
  date = col_date(format = ""),
  researcher = col_character(),
  country = col_character(),
  site = col_character(),
  religion = col_character(),
  subject_gender = col_character(),
  subject_job = col_character(),
  subject_schedule = col_character(),
  subject_livedhere = col_character(),
  subject_lang = col_character(),
  subject_marital = col_character(),
  subject_hs = col_character(),
  subject_liveswith = col_character(),
  servicesperweek = col_character()
)
See spec(...) for full column specifications.
d3_byq <- read_csv("./data_byquestion/packets123_data_byquestion_long.csv") %>%
  filter(packet == 1)
Parsed with column specification:
cols(
  packet = col_double(),
  version = col_double(),
  subj = col_double(),
  ctry = col_character(),
  wher = col_character(),
  recr = col_character(),
  whoc = col_character(),
  question = col_character(),
  response = col_double()
)
d4_byq <- read_csv("./data_byquestion/study4_byquestion.csv")
Missing column names filled in: 'X1' [1]Parsed with column specification:
cols(
  .default = col_double(),
  p7_ctry = col_character(),
  p7_abs_check = col_character(),
  p7_dse_check = col_character(),
  p7_se_check = col_character(),
  p7_unev_check = col_character(),
  p7_exsen_check = col_character(),
  p7_por_check = col_character(),
  p7_mm_check = col_character(),
  p7_dem_sex = col_character(),
  p7_dem_pocc = col_character(),
  p7_dem_major = col_character(),
  p7_dem_ethnicity = col_character(),
  p7_dem_rur.urb = col_character(),
  p7_dem_affrd.basics = col_character(),
  p7_dem_religion = col_character(),
  p7_dem_church = col_character(),
  p7_dem_holy.tung.gif = col_character(),
  p7_abs_child.exp_cat = col_logical(),
  p7_abs_poetic_cat = col_logical(),
  p7_abs_tv.real_cat = col_logical()
  # ... with 162 more columns
)
See spec(...) for full column specifications.
# dataframe with variable names optimized for stargazer tables
d1_fortab <- d1 %>%
  mutate_at(vars(ends_with("_score"), subject_age), scale) %>%
  mutate(subject_hs = case_when(is.na(subject_hs) ~ NA_character_,
                                grepl("yes", tolower(subject_hs)) ~ "yes",
                                TRUE ~ "no"),
         subject_hs = factor(subject_hs, 
                             levels = c("no", "yes")),
         subject_gender = factor(subject_gender, 
                                 levels = c("Female", "Male"))) %>%
  rename("Spiritual Events" = "spev_score",
         "Spiritual Events, recoded" = "spev_recoded_score",
         "Porosity Vignettes" = "pv_score",
         "Absorption" = "abs_score",
         "Country" = "country",
         "Site" = "site",
         "Religion" = "religion",
         "Gender" = "subject_gender",
         "Age" = "subject_age",
         "Education" = "subject_hs")
# set contrasts
contrasts(d1_fortab$Country) <- cbind(": Gh." = c(-1, 1, 0, 0, 0),
                                      ": Th." = c(-1, 0, 1, 0, 0),
                                      ": Ch." = c(-1, 0, 0, 1, 0),
                                      ": Va." = c(-1, 0, 0, 0, 1))
contrasts(d1_fortab$Site) <- cbind(": rural" = c(-1, 1))
contrasts(d1_fortab$Religion) <- cbind(": CC" = c(1, -1))
contrasts(d1_fortab$Education) <- cbind(": at least HS" = c(-1, 1))
contrasts(d1_fortab$Gender) <- cbind(": male" = c(-1, 1))
# dataframe with variable names optimized for stargazer tables
d3_fortab <- d3 %>%
  mutate_at(vars(ends_with("_score"), subject_age), scale) %>%
  mutate(subject_gender = factor(subject_gender, 
                                 levels = c("female", "male"))) %>%
  rename("Spiritual Events" = "spev_score",
         "Daily Spiritual Experiences" = "dse_score",
         "Absorption" = "abs_score",
         "Country" = "country",
         "Gender" = "subject_gender",
         "Age" = "subject_age")
# set contrasts
contrasts(d3_fortab$Country) <- cbind(": Gh." = c(-1, 1, 0, 0, 0),
                                      ": Th." = c(-1, 0, 1, 0, 0),
                                      ": Ch." = c(-1, 0, 0, 1, 0),
                                      ": Va." = c(-1, 0, 0, 0, 1))
contrasts(d3_fortab$Gender) <- cbind(": male" = c(-1, 1))
# dataframe with variable names optimized for stargazer tables
d4_fortab <- d4 %>%
  mutate_at(vars(ends_with("_score"), subject_age), scale) %>%
  mutate(subject_gender = factor(subject_gender, 
                                 levels = c("female", "male"))) %>%
  rename("Spiritual Events" = "spev_score",
         "Daily Spiritual Experience" = "dse_score",
         "Porosity Vignettes" = "pv_score",
         "Porosity Scale" = "por_score",
         "Absorption" = "abs_score",
         "Hallucinations" = "hall_score",
         "Paranormal" = "para_score",
         "Need for Cognition" = "cog_score",
         "Sense of Control" = "ctl_score",
         "Country" = "country",
         "Gender" = "subject_gender",
         "Age" = "subject_age")
# set contrasts
contrasts(d4_fortab$Country) <- cbind(": Gh." = c(-1, 1, 0, 0, 0),
                                      ": Th." = c(-1, 0, 1, 0, 0),
                                      ": Ch." = c(-1, 0, 0, 1, 0),
                                      ": Va." = c(-1, 0, 0, 0, 1))
contrasts(d4_fortab$Gender) <- cbind(": male" = c(-1, 1))

Omitting two presence items

“I can often somehow sense the presence of another person before I actually see or hear her/him.” “At times I somehow feel the presence of someone who is not physically there”

Study 1

d1_abs_omit <- d1_byq %>%
  select(subject_id, country, ends_with("_abs")) %>%
  select(-sensepresence_abs, -invisiblepresence_abs) %>%
  gather(question, response, -subject_id, -country) %>%
  group_by(subject_id, country) %>%
  summarise(Absorption = mean(response, na.rm = T)) %>%
  ungroup() %>%
  group_by(country) %>%
  mutate(Absorption = scale(Absorption)) %>%
  ungroup() %>%
  distinct(subject_id, Absorption) %>%
  right_join(d1_fortab %>% select(-Absorption)) %>%
  filter(subject_id %in% d1_fortab$subject_id)
`summarise()` has grouped output by 'subject_id'. You can override using the `.groups` argument.
Joining, by = "subject_id"

Table S20. Study 1, Spiritual Events: relationships with Porosity Vignettes and Absorption (sample as fixed effect)

r04_spev <- lm(`Spiritual Events` ~ `Porosity Vignettes`,
               data = d1_abs_omit)

r05_spev <- lm(`Spiritual Events` ~ Absorption,
               data = d1_abs_omit)

r06_spev <- lm(`Spiritual Events` ~ `Porosity Vignettes` * Absorption,
               data = d1_abs_omit)

r07_spev <- lm(`Spiritual Events` ~ Country * Site * Religion 
               + `Porosity Vignettes` + Country:`Porosity Vignettes`,
               data = d1_abs_omit)

r08_spev <- lm(`Spiritual Events` ~ Country * Site * Religion 
               + Absorption + Country:Absorption,
               data = d1_abs_omit)

r09_spev <- lm(`Spiritual Events` ~ Country * Site * Religion 
               + `Porosity Vignettes` + Country:`Porosity Vignettes`
               + Absorption + Country:Absorption
               + `Porosity Vignettes`:Absorption 
               + Country:`Porosity Vignettes`:Absorption,
               data = d1_abs_omit)

r10_spev <- lm(`Spiritual Events` ~ Country * Site * Religion 
               + `Porosity Vignettes` + Country:`Porosity Vignettes`
               + Absorption + Country:Absorption
               + `Porosity Vignettes`:Absorption
               + Country:`Porosity Vignettes`:Absorption
               + Gender + Age + Education,
               data = d1_abs_omit)
table_s20 <- stargazer(r04_spev, r05_spev, r06_spev, 
                       r07_spev, r08_spev, r09_spev, r10_spev,
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Vignettes`$",
                                 "^Absorption$",
                                 "^`Porosity Vignettes`:Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s20), 
    file = "./stargazer_tables/table_s20.html")
htmltools::includeHTML("./stargazer_tables/table_s20.html")
Spiritual Events
(1)(2)(3)(4)(5)(6)(7)
Porosity Vignettes0.36 (0.26, 0.47)0.33 (0.22, 0.43)0.36 (0.23, 0.48)0.32 (0.18, 0.47)0.30 (0.16, 0.44)
p = 0.00p = 0.00p = 0.0000001p = 0.00002p = 0.0001
Absorption0.19 (0.08, 0.30)0.13 (0.02, 0.24)0.27 (0.17, 0.36)0.23 (0.12, 0.35)0.24 (0.12, 0.36)
p = 0.001p = 0.02p = 0.0000001p = 0.0002p = 0.0001
Porosity Vignettes × Absorption-0.06 (-0.16, 0.05)-0.02 (-0.17, 0.13)-0.04 (-0.19, 0.11)
p = 0.31p = 0.81p = 0.61
Country: Gh.0.01 (-0.21, 0.23)0.15 (-0.02, 0.31)0.10 (-0.13, 0.32)0.09 (-0.14, 0.32)
p = 0.92p = 0.08p = 0.41p = 0.46
Country: Th.-0.14 (-0.37, 0.08)-0.04 (-0.25, 0.16)-0.12 (-0.34, 0.10)-0.12 (-0.35, 0.11)
p = 0.21p = 0.69p = 0.31p = 0.31
Country: Ch.-0.17 (-0.42, 0.08)-0.41 (-0.60, -0.22)-0.25 (-0.55, 0.05)-0.25 (-0.55, 0.05)
p = 0.18p = 0.00003p = 0.11p = 0.10
Country: Va.0.70 (0.51, 0.90)0.80 (0.59, 1.00)0.68 (0.46, 0.90)0.65 (0.40, 0.89)
p = 0.00p = 0.00p = 0.00p = 0.0000004
Site: rural0.01 (-0.08, 0.10)0.04 (-0.05, 0.14)0.05 (-0.05, 0.14)0.04 (-0.08, 0.15)
p = 0.79p = 0.40p = 0.35p = 0.53
Religion: CC0.24 (0.15, 0.34)0.27 (0.18, 0.37)0.25 (0.16, 0.35)0.25 (0.16, 0.35)
p = 0.0000005p = 0.0000001p = 0.0000004p = 0.000001
Gender: male-0.06 (-0.15, 0.03)
p = 0.21
Age-0.09 (-0.19, 0.02)
p = 0.11
Education: at least HS-0.12 (-0.29, 0.06)
p = 0.20
Country: Gh. × Site: rural-0.26 (-0.43, -0.10)-0.24 (-0.40, -0.07)-0.27 (-0.44, -0.11)-0.23 (-0.41, -0.06)
p = 0.002p = 0.01p = 0.002p = 0.01
Country: Th. × Site: rural-0.03 (-0.24, 0.18)-0.03 (-0.24, 0.17)-0.03 (-0.23, 0.18)-0.01 (-0.22, 0.20)
p = 0.77p = 0.76p = 0.80p = 0.94
Country: Ch. × Site: rural0.43 (0.24, 0.62)0.49 (0.29, 0.69)0.48 (0.28, 0.68)0.44 (0.23, 0.65)
p = 0.00002p = 0.000002p = 0.000003p = 0.0001
Country: Va. × Site: rural0.06 (-0.13, 0.25)-0.03 (-0.24, 0.18)0.02 (-0.20, 0.24)-0.01 (-0.23, 0.22)
p = 0.53p = 0.77p = 0.86p = 0.95
Country: Gh. × Religion: CC-0.17 (-0.33, 0.001)-0.15 (-0.32, 0.02)-0.12 (-0.29, 0.05)-0.11 (-0.31, 0.09)
p = 0.06p = 0.08p = 0.17p = 0.31
Country: Th. × Religion: CC-0.18 (-0.39, 0.04)-0.11 (-0.32, 0.09)-0.16 (-0.37, 0.05)-0.16 (-0.38, 0.06)
p = 0.11p = 0.29p = 0.14p = 0.16
Country: Ch. × Religion: CC-0.16 (-0.35, 0.03)-0.12 (-0.31, 0.08)-0.10 (-0.29, 0.09)-0.13 (-0.32, 0.06)
p = 0.11p = 0.25p = 0.32p = 0.20
Country: Va. × Religion: CC0.21 (0.02, 0.40)0.12 (-0.09, 0.33)0.12 (-0.09, 0.33)0.14 (-0.07, 0.35)
p = 0.03p = 0.26p = 0.25p = 0.21
Site: rural × Religion: CC-0.07 (-0.17, 0.02)-0.13 (-0.23, -0.04)-0.11 (-0.21, -0.02)-0.13 (-0.23, -0.04)
p = 0.12p = 0.01p = 0.03p = 0.01
Country: Gh. × Porosity Vignettes-0.20 (-0.39, -0.001)-0.25 (-0.46, -0.04)-0.23 (-0.44, -0.03)
p = 0.05p = 0.02p = 0.03
Country: Th. × Porosity Vignettes-0.07 (-0.32, 0.17)-0.06 (-0.31, 0.19)-0.04 (-0.30, 0.21)
p = 0.56p = 0.65p = 0.74
Country: Ch. × Porosity Vignettes-0.03 (-0.27, 0.22)-0.08 (-0.36, 0.20)-0.05 (-0.34, 0.23)
p = 0.84p = 0.57p = 0.72
Country: Va. × Porosity Vignettes0.40 (0.06, 0.73)0.51 (0.10, 0.92)0.45 (0.03, 0.86)
p = 0.03p = 0.02p = 0.04
Country: Gh. × Absorption0.11 (-0.08, 0.30)0.16 (-0.05, 0.38)0.16 (-0.05, 0.38)
p = 0.26p = 0.15p = 0.14
Country: Th. × Absorption0.04 (-0.15, 0.22)0.09 (-0.11, 0.30)0.08 (-0.12, 0.29)
p = 0.69p = 0.38p = 0.43
Country: Ch. × Absorption0.04 (-0.16, 0.24)-0.03 (-0.34, 0.28)-0.05 (-0.36, 0.26)
p = 0.71p = 0.84p = 0.77
Country: Va. × Absorption-0.05 (-0.26, 0.15)-0.06 (-0.27, 0.15)-0.05 (-0.26, 0.16)
p = 0.61p = 0.60p = 0.66
Country: Gh. × Site: rural × Religion: CC-0.12 (-0.28, 0.04)-0.21 (-0.39, -0.03)-0.23 (-0.41, -0.05)-0.24 (-0.42, -0.06)
p = 0.16p = 0.03p = 0.02p = 0.02
Country: Th. × Site: rural × Religion: CC0.21 (-0.001, 0.42)0.30 (0.09, 0.51)0.25 (0.05, 0.46)0.25 (0.04, 0.46)
p = 0.06p = 0.01p = 0.02p = 0.03
Country: Ch. × Site: rural × Religion: CC-0.16 (-0.35, 0.03)-0.08 (-0.27, 0.12)-0.09 (-0.28, 0.10)-0.09 (-0.28, 0.10)
p = 0.11p = 0.44p = 0.38p = 0.37
Country: Va. × Site: rural × Religion: CC0.05 (-0.15, 0.24)-0.02 (-0.23, 0.19)0.05 (-0.16, 0.26)0.07 (-0.15, 0.28)
p = 0.65p = 0.86p = 0.64p = 0.55
Country: Gh. × Porosity Vignettes × Absorption-0.06 (-0.26, 0.14)-0.08 (-0.27, 0.12)
p = 0.55p = 0.46
Country: Th. × Porosity Vignettes × Absorption-0.17 (-0.41, 0.07)-0.18 (-0.42, 0.06)
p = 0.16p = 0.14
Country: Ch. × Porosity Vignettes × Absorption-0.03 (-0.33, 0.28)0.01 (-0.30, 0.31)
p = 0.87p = 0.97
Country: Va. × Porosity Vignettes × Absorption0.31 (-0.17, 0.79)0.26 (-0.21, 0.74)
p = 0.21p = 0.29
Constant-0.01 (-0.12, 0.09)-0.01 (-0.12, 0.10)-0.01 (-0.11, 0.10)0.03 (-0.08, 0.14)0.01 (-0.08, 0.11)0.04 (-0.07, 0.16)0.09 (-0.05, 0.23)
p = 0.79p = 0.82p = 0.93p = 0.62p = 0.79p = 0.47p = 0.20
Observations318301297318301297293
R20.130.040.140.460.450.500.52
Adjusted R20.130.030.130.420.400.440.45
Residual Std. Error0.94 (df = 316)0.97 (df = 299)0.92 (df = 293)0.77 (df = 293)0.76 (df = 276)0.74 (df = 262)0.74 (df = 255)
F Statistic48.40*** (df = 1; 316)11.87*** (df = 1; 299)16.20*** (df = 3; 293)10.38*** (df = 24; 293)9.39*** (df = 24; 276)7.73*** (df = 34; 262)7.43*** (df = 37; 255)

Table S21. Study 1, Spiritual Events: relationships with Porosity Vignettes and Absorption (sample as random effect)

r11_spev <- lmer(`Spiritual Events` ~ 1 
                 + (1 | Country/Site/Religion),
                 control = lmerControl(optimizer = "bobyqa"),
                 data = d1_abs_omit)
boundary (singular) fit: see ?isSingular
r12_spev <- lmer(`Spiritual Events` ~ `Porosity Vignettes` 
                 # + (1 + `Porosity Vignettes` | Country/Site/Religion),
                 + (1 | Country/Site/Religion),
                 control = lmerControl(optimizer = "bobyqa"),
                 data = d1_abs_omit)
boundary (singular) fit: see ?isSingular
r13_spev <- lmer(`Spiritual Events` ~ Absorption
                 # + (1 + Absorption | Country/Site/Religion),
                 + (1 | Country/Site/Religion),
                 control = lmerControl(optimizer = "bobyqa"),
                 data = d1_abs_omit)
boundary (singular) fit: see ?isSingular
r14_spev <- lmer(`Spiritual Events` ~ `Porosity Vignettes` * Absorption 
                 # + (1 + `Porosity Vignettes` * Absorption | Country/Site/Religion),
                 # + (1 + `Porosity Vignettes` + Absorption | Country/Site/Religion),
                 + (1 | Country/Site/Religion),
                 control = lmerControl(optimizer = "bobyqa"),
                 data = d1_abs_omit)

r15_spev <- lmer(`Spiritual Events` ~ `Porosity Vignettes` * Absorption
                 + Gender + Age + Education
                 # + (1 + `Porosity Vignettes` * Absorption | Country/Site/Religion),
                 # + (1 + `Porosity Vignettes` + Absorption | Country/Site/Religion),
                 + (1 | Country/Site/Religion),
                 control = lmerControl(optimizer = "bobyqa"),
                 data = d1_abs_omit)
boundary (singular) fit: see ?isSingular
htmltools::includeHTML("./stargazer_tables/table_s21.html")
Spiritual Events
(1)(2)(3)(4)(5)
Porosity Vignettes0.29 (0.18, 0.40)0.22 (0.11, 0.34)0.21 (0.10, 0.32)
p = 0.0000002p = 0.0001p = 0.0002
Absorption0.25 (0.16, 0.34)0.20 (0.11, 0.30)0.20 (0.11, 0.29)
p = 0.0000002p = 0.00002p = 0.00003
Porosity Vignettes × Absorption-0.04 (-0.13, 0.05)-0.06 (-0.15, 0.03)
p = 0.43p = 0.23
Gender: male-0.05 (-0.14, 0.04)
p = 0.30
Age-0.09 (-0.19, 0.01)
p = 0.09
Education: at least HS-0.18 (-0.33, -0.03)
p = 0.03
Constant0.01 (-0.45, 0.48)0.01 (-0.38, 0.40)0.01 (-0.44, 0.46)0.02 (-0.37, 0.42)0.09 (-0.26, 0.45)
p = 0.96p = 0.96p = 0.96p = 0.92p = 0.61
Observations334318301297293
Log Likelihood-421.69-392.09-369.17-361.22-357.15
Akaike Inf. Crit.853.38796.18750.33738.44736.29
Bayesian Inf. Crit.872.44818.75772.58767.99776.77
rsq_table_fun(list(r11_spev, r12_spev, r13_spev, r14_spev, r15_spev))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.00 0.08 0.06 0.11 0.14
Conditional 0.39 0.41 0.46 0.45 0.45

Study 3

d3_abs_omit <- d3_byq %>%
  select(subj, ctry, question, response) %>%
  filter(question %in% c("exwl_01", "exwl_02", "exwl_03", "exwl_04", "exwl_05", "exwl_06",
                         "exwl_07", "exwl_08", "exwl_09", "exwl_10", "exwl_11", "exwl_12",
                         "exwl_13", "exwl_14", "exwl_15", "exwl_16", "exwl_17", "exwl_18",
                         "exwl_19", "exwl_20", "exwl_21", "exwl_22", "exwl_23", "exwl_24",
                         "exwl_25", "exwl_26", "exwl_27", "exwl_28", "exwl_29", "exwl_30",
                         "exwl_31", "exwl_32", "exwl_33", "exwl_34")) %>%
  filter(question != "exwl_14", question != "exwl_31") %>%
  group_by(subj, ctry) %>%
  summarise(Absorption = mean(response, na.rm = T)) %>%
  ungroup() %>%
  group_by(ctry) %>%
  mutate(Absorption = scale(Absorption)) %>%
  ungroup() %>%
  distinct(subj, Absorption) %>%
  rename(subject_id = subj) %>%
  right_join(d3_fortab %>% select(-Absorption)) %>%
  filter(subject_id %in% d3_fortab$subject_id)
`summarise()` has grouped output by 'subj'. You can override using the `.groups` argument.
Joining, by = "subject_id"

Table S32. Study 3, Spiritual Events and Daily Spiritual Experience: relationships with Absorption (sample as fixed effect)

r03_spev <- lm(`Spiritual Events` ~ `Absorption`,
               data = d3_abs_omit)

r04_spev <- lm(`Spiritual Events` ~ Country * `Absorption`,
               data = d3_abs_omit)

r05_spev <- lm(`Spiritual Events` ~ Country * `Absorption`
               + Gender + Age,  
               data = d3_abs_omit)
r03_dse <- lm(`Daily Spiritual Experiences` ~ `Absorption`,
              data = d3_abs_omit)

r04_dse <- lm(`Daily Spiritual Experiences` ~ Country * `Absorption`,
              data = d3_abs_omit)

r05_dse <- lm(`Daily Spiritual Experiences` ~ Country * `Absorption`
              + Gender + Age,  
              data = d3_abs_omit)
table_s32 <- stargazer(r03_spev, r04_spev, r05_spev, r03_dse, r04_dse, r05_dse, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s32), 
    file = "./stargazer_tables/table_s32.html")
htmltools::includeHTML("./stargazer_tables/table_s32.html")
Spiritual EventsDaily Spiritual Experiences
(1)(2)(3)(4)(5)(6)
Absorption0.36 (0.28, 0.44)0.36 (0.30, 0.42)0.36 (0.30, 0.42)0.22 (0.14, 0.31)0.22 (0.16, 0.28)0.22 (0.16, 0.28)
p = 0.00p = 0.00p = 0.00p = 0.0000004p = 0.00p = 0.00
Country: Gh.0.89 (0.76, 1.01)0.90 (0.77, 1.02)0.87 (0.75, 0.99)0.89 (0.77, 1.01)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.50 (-0.62, -0.39)-0.49 (-0.61, -0.36)-0.18 (-0.29, -0.07)-0.17 (-0.29, -0.05)
p = 0.00p = 0.00p = 0.002p = 0.005
Country: Ch.-0.67 (-0.79, -0.55)-0.67 (-0.80, -0.55)-1.13 (-1.25, -1.02)-1.14 (-1.25, -1.02)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.59 (0.47, 0.71)0.53 (0.39, 0.67)0.66 (0.54, 0.77)0.58 (0.45, 0.72)
p = 0.00p = 0.00p = 0.00p = 0.00
Gender: male-0.02 (-0.09, 0.04)-0.06 (-0.12, 0.001)
p = 0.50p = 0.06
Age0.06 (-0.01, 0.14)0.09 (0.02, 0.16)
p = 0.10p = 0.02
Country: Gh. × Absorption0.23 (0.11, 0.36)0.23 (0.11, 0.36)0.01 (-0.11, 0.13)0.005 (-0.11, 0.12)
p = 0.0003p = 0.0003p = 0.92p = 0.94
Country: Th. × Absorption-0.16 (-0.27, -0.04)-0.16 (-0.28, -0.04)0.08 (-0.03, 0.20)0.08 (-0.04, 0.19)
p = 0.01p = 0.01p = 0.16p = 0.19
Country: Ch. × Absorption-0.13 (-0.25, -0.01)-0.12 (-0.24, -0.0004)-0.03 (-0.14, 0.09)-0.02 (-0.14, 0.10)
p = 0.04p = 0.05p = 0.65p = 0.73
Country: Va. × Absorption0.06 (-0.06, 0.18)0.05 (-0.07, 0.17)-0.09 (-0.21, 0.02)-0.11 (-0.23, 0.01)
p = 0.34p = 0.43p = 0.12p = 0.08
Constant0.00 (-0.08, 0.08)0.03 (-0.03, 0.09)0.02 (-0.04, 0.08)0.00 (-0.08, 0.08)0.02 (-0.04, 0.08)0.01 (-0.05, 0.07)
p = 1.00p = 0.41p = 0.47p = 1.00p = 0.50p = 0.71
Observations519519513519519513
R20.130.520.530.050.550.56
Adjusted R20.130.520.520.050.540.55
Residual Std. Error0.94 (df = 517)0.70 (df = 509)0.70 (df = 501)0.98 (df = 517)0.67 (df = 509)0.67 (df = 501)
F Statistic75.27*** (df = 1; 517)62.17*** (df = 9; 509)50.68*** (df = 11; 501)26.75*** (df = 1; 517)69.85*** (df = 9; 509)58.40*** (df = 11; 501)

Table S33. Study 3, Spiritual Events and Daily Spiritual Experience: relationships with Absorption (sample as random effect)

r06_spev <- lmer(`Spiritual Events` ~ 1 
                 + (1 | Country),
                 control = lmerControl(optimizer = "bobyqa"),
                 data = d3_abs_omit)

r07_spev <- lmer(`Spiritual Events` ~ `Absorption` 
                 # + (1 + `Absorption` | Country), # perfectly correlated ranfx
                 + (1 | Country),
                 control = lmerControl(optimizer = "bobyqa"),
                 data = d3_abs_omit)

r08_spev <- lmer(`Spiritual Events` ~ `Absorption`
                 + Gender + Age 
                 # + (1 + `Absorption` + Gender + Age | Country), # perfectly correlated ranfx
                 # + (1 + `Absorption` | Country), # perfectly correlated ranfx
                 + (1 | Country),
                 control = lmerControl(optimizer = "bobyqa"),
                 data = d3_abs_omit)
r06_dse <- lmer(`Daily Spiritual Experiences` ~ 1 
                + (1 | Country),
                control = lmerControl(optimizer = "bobyqa"),
                data = d3_abs_omit)

r07_dse <- lmer(`Daily Spiritual Experiences` ~ `Absorption` 
                # + (1 + `Absorption` | Country), # perfectly correlated ranfx
                + (1 | Country),
                control = lmerControl(optimizer = "bobyqa"),
                data = d3_abs_omit)

r08_dse <- lmer(`Daily Spiritual Experiences` ~ `Absorption`
                + Gender + Age 
                # + (1 + `Absorption` + Gender + Age | Country), 
                # + (1 + `Absorption` | Country),
                + (1 | Country), # use this for comparsion with spev
                control = lmerControl(optimizer = "bobyqa"),
                data = d3_abs_omit)
table_s33 <- stargazer(r06_spev, r07_spev, r08_spev, r06_dse, r07_dse, r08_dse,
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 0800,
                       omit.table.layout = "n",
                       order = c("^`Absorption`$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s33), 
    file = "./stargazer_tables/table_s33.html")
htmltools::includeHTML("./stargazer_tables/table_s33.html")
Spiritual EventsDaily Spiritual Experiences
(1)(2)(3)(4)(5)(6)
Absorption0.36 (0.30, 0.42)0.36 (0.29, 0.42)0.22 (0.16, 0.28)0.22 (0.16, 0.28)
p = 0.00p = 0.00p = 0.00p = 0.00
Gender: male-0.02 (-0.09, 0.05)-0.07 (-0.13, -0.004)
p = 0.55p = 0.04
Age0.07 (-0.003, 0.15)0.08 (0.01, 0.15)
p = 0.07p = 0.03
Constant0.03 (-0.58, 0.63)0.03 (-0.58, 0.63)0.02 (-0.57, 0.62)0.02 (-0.68, 0.72)0.02 (-0.68, 0.72)0.01 (-0.68, 0.70)
p = 0.94p = 0.94p = 0.95p = 0.96p = 0.96p = 0.98
Observations519519513519519513
Log Likelihood-626.20-570.08-567.78-570.44-546.42-541.27
Akaike Inf. Crit.1,258.401,148.161,147.561,146.881,100.841,094.54
Bayesian Inf. Crit.1,271.151,165.161,173.001,159.631,117.851,119.98
rsq_table_fun(list(r06_spev, r07_spev, r08_spev, r06_dse, r07_dse, r08_dse))
R-squared Type (1) (2) (3) (4) (5) (6)
Marginal 0.00 0.12 0.12 0.00 0.04 0.05
Conditional 0.43 0.55 0.54 0.56 0.60 0.60

Table S34. Study 3, Spiritual Events: relationships with Absorption by country

r09_us_spev <- lm(`Spiritual Events` ~ `Absorption`,
                  data = d3_abs_omit %>% 
                    filter(Country == "US") %>%
                    mutate_at(vars(`Spiritual Events`, `Absorption`),
                              ~ scale(.)))

r09_gh_spev <- lm(`Spiritual Events` ~ `Absorption`,
                  data = d3_abs_omit %>% 
                    filter(Country == "Ghana") %>%
                    mutate_at(vars(`Spiritual Events`, `Absorption`),
                              ~ scale(.)))

r09_th_spev <- lm(`Spiritual Events` ~ `Absorption`,
                  data = d3_abs_omit %>% 
                    filter(Country == "Thailand") %>%
                    mutate_at(vars(`Spiritual Events`, `Absorption`),
                              ~ scale(.)))

r09_ch_spev <- lm(`Spiritual Events` ~ `Absorption`,
                  data = d3_abs_omit %>% 
                    filter(Country == "China") %>%
                    mutate_at(vars(`Spiritual Events`, `Absorption`),
                              ~ scale(.)))

r09_vt_spev <- lm(`Spiritual Events` ~ `Absorption`,
                  data = d3_abs_omit %>% 
                    filter(Country == "Vanuatu") %>%
                    mutate_at(vars(`Spiritual Events`, `Absorption`),
                              ~ scale(.)))
table_s34 <- stargazer(r09_us_spev, r09_gh_spev, r09_th_spev, r09_ch_spev, r09_vt_spev, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Absorption`$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s34), 
    file = "./stargazer_tables/table_s34.html")
htmltools::includeHTML("./stargazer_tables/table_s34.html")
Spiritual Events
(1)(2)(3)(4)(5)
Absorption0.39 (0.21, 0.57)0.56 (0.40, 0.73)0.43 (0.27, 0.60)0.48 (0.32, 0.65)0.48 (0.31, 0.65)
p = 0.00004p = 0.00p = 0.000002p = 0.0000002p = 0.0000005
Constant-0.00 (-0.18, 0.18)-0.00 (-0.17, 0.17)0.00 (-0.17, 0.17)-0.00 (-0.17, 0.17)0.00 (-0.17, 0.17)
p = 1.00p = 1.00p = 1.00p = 1.00p = 1.00
Observations10697112104100
R20.150.320.190.240.23
Adjusted R20.140.310.180.230.22
Residual Std. Error0.93 (df = 104)0.83 (df = 95)0.91 (df = 110)0.88 (df = 102)0.88 (df = 98)
F Statistic18.57*** (df = 1; 104)43.73*** (df = 1; 95)25.50*** (df = 1; 110)31.36*** (df = 1; 102)29.24*** (df = 1; 98)

Table S35. Study 3, Daily Spiritual Experience: relationships with Absorption by country

r09_us_dse <- lm(`Daily Spiritual Experiences` ~ `Absorption`,
                 data = d3_abs_omit %>% 
                   filter(Country == "US") %>%
                   mutate_at(vars(`Daily Spiritual Experiences`, `Absorption`),
                             ~ scale(.)))

r09_gh_dse <- lm(`Daily Spiritual Experiences` ~ `Absorption`,
                 data = d3_abs_omit %>% 
                   filter(Country == "Ghana") %>%
                   mutate_at(vars(`Daily Spiritual Experiences`, `Absorption`),
                             ~ scale(.)))

r09_th_dse <- lm(`Daily Spiritual Experiences` ~ `Absorption`,
                 data = d3_abs_omit %>% 
                   filter(Country == "Thailand") %>%
                   mutate_at(vars(`Daily Spiritual Experiences`, `Absorption`),
                             ~ scale(.)))

r09_ch_dse <- lm(`Daily Spiritual Experiences` ~ `Absorption`,
                 data = d3_abs_omit %>% 
                   filter(Country == "China") %>%
                   mutate_at(vars(`Daily Spiritual Experiences`, `Absorption`),
                             ~ scale(.)))

r09_vt_dse <- lm(`Daily Spiritual Experiences` ~ `Absorption`,
                 data = d3_abs_omit %>% 
                   filter(Country == "Vanuatu") %>%
                   mutate_at(vars(`Daily Spiritual Experiences`, `Absorption`),
                             ~ scale(.)))
table_s35 <- stargazer(r09_us_dse, r09_gh_dse, r09_th_dse, r09_ch_dse, r09_vt_dse, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Absorption`$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s35), 
    file = "./stargazer_tables/table_s35.html")
htmltools::includeHTML("./stargazer_tables/table_s35.html")
Daily Spiritual Experiences
(1)(2)(3)(4)(5)
Absorption0.24 (0.05, 0.43)0.35 (0.16, 0.53)0.54 (0.38, 0.70)0.39 (0.21, 0.57)0.20 (0.004, 0.39)
p = 0.02p = 0.001p = 0.00p = 0.00005p = 0.05
Constant0.00 (-0.19, 0.19)0.00 (-0.19, 0.19)-0.00 (-0.16, 0.16)0.00 (-0.18, 0.18)-0.00 (-0.19, 0.19)
p = 1.00p = 1.00p = 1.00p = 1.00p = 1.00
Observations10697112104100
R20.060.120.290.150.04
Adjusted R20.050.110.280.140.03
Residual Std. Error0.98 (df = 104)0.94 (df = 95)0.85 (df = 110)0.93 (df = 102)0.99 (df = 98)
F Statistic6.36** (df = 1; 104)12.87*** (df = 1; 95)44.79*** (df = 1; 110)18.23*** (df = 1; 102)4.00** (df = 1; 98)

Study 4

Relationships: Spiritual presence events

d4_abs_omit <- d4_byq %>%
  select(p7_subj, p7_ctry, contains("_abs_")) %>%
  select(-ends_with("cat"), -ends_with("total"), -contains("_check")) %>%
  select(-p7_abs_sense.presc, -p7_abs_not.physical) %>%
  gather(question, response, -p7_subj, -p7_ctry) %>%
  group_by(p7_subj, p7_ctry) %>%
  summarise(Absorption = mean(response, na.rm = T)) %>%
  ungroup() %>%
  group_by(p7_ctry) %>%
  mutate(Absorption = scale(Absorption)) %>%
  ungroup() %>%
  distinct(p7_subj, Absorption) %>%
  rename(subject_id = p7_subj) %>%
  right_join(d4_fortab %>% select(-Absorption)) %>%
  filter(subject_id %in% d4_fortab$subject_id)
`summarise()` has grouped output by 'p7_subj'. You can override using the `.groups` argument.
Joining, by = "subject_id"
# longform dataframe
d4_fortab_long_spirit <- d4_abs_omit %>% 
  gather(Scale, Score, 
         c(`Spiritual Events`, `Daily Spiritual Experience`)) %>%
  mutate(Scale = factor(Scale))
# set contrasts
contrasts(d4_fortab_long_spirit$Country) <- cbind(": Gh." = c(-1, 1, 0, 0, 0),
                                                  ": Th." = c(-1, 0, 1, 0, 0),
                                                  ": Ch." = c(-1, 0, 0, 1, 0),
                                                  ": Va." = c(-1, 0, 0, 0, 1))
contrasts(d4_fortab_long_spirit$Gender) <- cbind(": male" = c(-1, 1))
contrasts(d4_fortab_long_spirit$Scale) <- cbind(": Spiritual Events" = c(-1, 1))

Table S40. Study 4, measures of spiritual presence events: relationships with Porosity Vignettes and Absorption (sample as fixed effect)

r03_spirit <- lmer(Score ~ Scale * `Porosity Vignettes`
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r04_spirit <- lmer(Score ~ Scale * `Porosity Scale`
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r05_spirit <- lmer(Score ~ Scale * Absorption
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r06_spirit <- lmer(Score ~ Scale * Country * `Porosity Vignettes`
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r07_spirit <- lmer(Score ~ Scale * Country * `Porosity Scale`
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r08_spirit <- lmer(Score ~ Scale * Country * Absorption
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r09_spirit <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * Absorption
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r10_spirit <- lmer(Score ~ Scale * Country * `Porosity Scale` * Absorption
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r11_spirit <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * Absorption
                   + Gender + Age
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r12_spirit <- lmer(Score ~ Scale * Country * `Porosity Scale` * Absorption
                   + Gender + Age
                   + (1 | subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)
table_s40 <- stargazer(r03_spirit, #r04_spirit, 
                       r05_spirit, r06_spirit, #r07_spirit, 
                       r08_spirit, r09_spirit, #r10_spirit,
                       r11_spirit, #r12_spirit, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Vignettes`$",
                                 "^Absorption$",
                                 "^`Porosity Vignettes`:Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T) 
cat(sub_interact_fun(table_s40), 
    file = "./stargazer_tables/table_s40.html")
htmltools::includeHTML("./stargazer_tables/table_s40.html")
Score
(1)(2)(3)(4)(5)(6)
Porosity Vignettes0.53 (0.47, 0.60)0.27 (0.20, 0.33)0.23 (0.16, 0.29)0.23 (0.16, 0.30)
p = 0.00p = 0.00p = 0.00p = 0.00
Absorption0.20 (0.12, 0.28)0.20 (0.14, 0.26)0.18 (0.11, 0.24)0.17 (0.11, 0.24)
p = 0.0000004p = 0.00p = 0.0000004p = 0.000001
Porosity Vignettes × Absorption-0.01 (-0.07, 0.06)0.003 (-0.07, 0.07)
p = 0.87p = 0.94
Scale: Spiritual Events-0.001 (-0.04, 0.03)-0.001 (-0.04, 0.03)-0.02 (-0.06, 0.02)-0.001 (-0.03, 0.03)-0.02 (-0.06, 0.02)-0.02 (-0.06, 0.03)
p = 0.94p = 0.94p = 0.38p = 0.98p = 0.42p = 0.43
Country: Gh.0.69 (0.56, 0.82)0.83 (0.72, 0.94)0.73 (0.60, 0.86)0.71 (0.58, 0.84)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.29 (-0.40, -0.17)-0.29 (-0.39, -0.18)-0.32 (-0.43, -0.20)-0.32 (-0.43, -0.20)
p = 0.000001p = 0.0000002p = 0.00000004p = 0.0000002
Country: Ch.-0.68 (-0.83, -0.52)-0.86 (-0.97, -0.75)-0.70 (-0.85, -0.55)-0.67 (-0.83, -0.52)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.50 (0.36, 0.65)0.62 (0.51, 0.74)0.53 (0.38, 0.67)0.49 (0.34, 0.65)
p = 0.00p = 0.00p = 0.00p = 0.00
Scale: Spiritual Events × Country: Gh.-0.06 (-0.14, 0.02)-0.02 (-0.08, 0.05)-0.05 (-0.13, 0.03)-0.05 (-0.13, 0.03)
p = 0.12p = 0.65p = 0.22p = 0.24
Scale: Spiritual Events × Country: Th.-0.09 (-0.16, -0.02)-0.12 (-0.18, -0.05)-0.10 (-0.18, -0.03)-0.11 (-0.18, -0.03)
p = 0.02p = 0.001p = 0.005p = 0.01
Scale: Spiritual Events × Country: Ch.0.16 (0.06, 0.26)0.20 (0.13, 0.27)0.16 (0.06, 0.26)0.16 (0.06, 0.26)
p = 0.002p = 0.00p = 0.002p = 0.003
Scale: Spiritual Events × Country: Va.-0.13 (-0.22, -0.03)-0.14 (-0.21, -0.07)-0.10 (-0.19, -0.01)-0.10 (-0.20, -0.003)
p = 0.01p = 0.0002p = 0.04p = 0.05
Scale: Spiritual Events × Porosity Vignettes0.01 (-0.03, 0.04)0.04 (-0.003, 0.08)0.03 (-0.01, 0.07)0.03 (-0.01, 0.08)
p = 0.75p = 0.07p = 0.20p = 0.17
Gender: male-0.02 (-0.07, 0.04)
p = 0.58
Age0.06 (-0.01, 0.12)
p = 0.08
Scale: Spiritual Events × Absorption0.04 (0.01, 0.08)0.04 (0.01, 0.08)0.05 (0.01, 0.09)0.05 (0.004, 0.09)
p = 0.02p = 0.02p = 0.03p = 0.04
Country: Gh. × Porosity Vignettes-0.11 (-0.23, 0.002)-0.11 (-0.23, 0.01)-0.12 (-0.23, 0.002)
p = 0.06p = 0.07p = 0.06
Country: Th. × Porosity Vignettes-0.04 (-0.17, 0.08)-0.07 (-0.19, 0.06)-0.08 (-0.21, 0.04)
p = 0.49p = 0.28p = 0.20
Country: Ch. × Porosity Vignettes0.07 (-0.10, 0.23)0.08 (-0.08, 0.25)0.06 (-0.10, 0.23)
p = 0.45p = 0.33p = 0.45
Country: Va. × Porosity Vignettes-0.15 (-0.30, -0.0001)-0.14 (-0.30, 0.01)-0.14 (-0.30, 0.01)
p = 0.05p = 0.07p = 0.08
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes0.07 (-0.003, 0.14)0.07 (-0.002, 0.15)0.07 (-0.01, 0.15)
p = 0.06p = 0.06p = 0.08
Scale: Spiritual Events × Country: Th. × Porosity Vignettes-0.01 (-0.09, 0.07)0.003 (-0.08, 0.08)0.0004 (-0.08, 0.08)
p = 0.85p = 0.94p = 1.00
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes-0.12 (-0.22, -0.01)-0.11 (-0.22, -0.01)-0.12 (-0.22, -0.01)
p = 0.04p = 0.04p = 0.04
Scale: Spiritual Events × Country: Va. × Porosity Vignettes-0.03 (-0.13, 0.07)-0.04 (-0.14, 0.05)-0.05 (-0.15, 0.06)
p = 0.54p = 0.37p = 0.38
Country: Gh. × Absorption-0.04 (-0.16, 0.07)-0.01 (-0.13, 0.11)-0.001 (-0.12, 0.12)
p = 0.45p = 0.91p = 0.99
Country: Th. × Absorption0.03 (-0.07, 0.14)0.03 (-0.09, 0.14)0.03 (-0.08, 0.14)
p = 0.54p = 0.64p = 0.61
Country: Ch. × Absorption-0.03 (-0.15, 0.08)0.04 (-0.13, 0.21)0.04 (-0.13, 0.21)
p = 0.57p = 0.62p = 0.64
Country: Va. × Absorption-0.07 (-0.18, 0.05)-0.01 (-0.16, 0.13)-0.01 (-0.16, 0.14)
p = 0.26p = 0.86p = 0.90
Scale: Spiritual Events × Country: Gh. × Absorption0.01 (-0.06, 0.08)-0.01 (-0.08, 0.07)-0.01 (-0.09, 0.07)
p = 0.80p = 0.88p = 0.88
Scale: Spiritual Events × Country: Th. × Absorption-0.04 (-0.11, 0.02)-0.05 (-0.12, 0.02)-0.05 (-0.12, 0.02)
p = 0.20p = 0.18p = 0.19
Scale: Spiritual Events × Country: Ch. × Absorption-0.01 (-0.08, 0.06)-0.02 (-0.13, 0.09)-0.02 (-0.14, 0.09)
p = 0.86p = 0.68p = 0.68
Scale: Spiritual Events × Country: Va. × Absorption0.01 (-0.07, 0.08)0.08 (-0.02, 0.17)0.07 (-0.03, 0.18)
p = 0.88p = 0.11p = 0.15
Scale: Spiritual Events × Porosity Vignettes × Absorption-0.01 (-0.06, 0.03)-0.01 (-0.06, 0.03)
p = 0.56p = 0.65
Country: Gh. × Porosity Vignettes × Absorption-0.10 (-0.21, 0.01)-0.10 (-0.22, 0.01)
p = 0.09p = 0.08
Country: Th. × Porosity Vignettes × Absorption0.06 (-0.06, 0.19)0.05 (-0.07, 0.18)
p = 0.33p = 0.42
Country: Ch. × Porosity Vignettes × Absorption0.09 (-0.08, 0.27)0.07 (-0.10, 0.25)
p = 0.30p = 0.42
Country: Va. × Porosity Vignettes × Absorption-0.05 (-0.19, 0.09)-0.06 (-0.21, 0.08)
p = 0.49p = 0.40
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes × Absorption-0.02 (-0.10, 0.05)-0.03 (-0.10, 0.05)
p = 0.54p = 0.50
Scale: Spiritual Events × Country: Th. × Porosity Vignettes × Absorption0.07 (-0.01, 0.15)0.07 (-0.01, 0.15)
p = 0.08p = 0.09
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes × Absorption-0.01 (-0.12, 0.11)-0.01 (-0.13, 0.11)
p = 0.90p = 0.88
Scale: Spiritual Events × Country: Va. × Porosity Vignettes × Absorption-0.10 (-0.19, -0.01)-0.10 (-0.19, -0.00002)
p = 0.04p = 0.05
Constant-0.001 (-0.07, 0.06)-0.001 (-0.08, 0.08)0.06 (-0.002, 0.13)0.02 (-0.04, 0.07)0.07 (0.002, 0.13)0.06 (-0.01, 0.13)
p = 0.97p = 0.98p = 0.06p = 0.56p = 0.05p = 0.10
Observations1,0081,0081,0081,0081,008978
Log Likelihood-1,186.34-1,275.26-1,082.26-1,113.46-1,105.26-1,083.77
Akaike Inf. Crit.2,384.672,562.522,208.532,270.932,294.512,255.54
Bayesian Inf. Crit.2,414.162,592.012,316.672,379.082,500.972,470.50
rsq_table_fun(list(r03_spirit, #r04_spirit, 
                   r05_spirit, r06_spirit, #r07_spirit, 
                   r08_spirit, r09_spirit, #r10_spirit,
                   r11_spirit #, r12_spirit 
))
R-squared Type (1) (2) (3) (4) (5) (6)
Marginal 0.28 0.04 0.49 0.45 0.51 0.51
Conditional 0.67 0.67 0.71 0.70 0.71 0.71

Table S41. Study 4, measures of spiritual presence events: relationships with Porosity Scale and Absorption (sample as fixed effect)

table_s41 <- stargazer(#r03_spirit, 
  r04_spirit, r05_spirit, #r06_spirit,
  r07_spirit, r08_spirit, #r09_spirit, 
  r10_spirit, #r11_spirit, 
  r12_spirit, 
  type = "html",
  ci = T,
  report = c("vcsp"),
  digits = 2,
  digits.extra = 1000,
  omit.table.layout = "n",
  order = c("^`Porosity Scale`$",
            "^Absorption$",
            "^`Porosity Scale`:Absorption$"),
  # dep.var.labels.include = F,
  dep.var.caption = "",
  single.row = T) 
cat(sub_interact_fun(table_s41), 
    file = "./stargazer_tables/table_s41.html")
htmltools::includeHTML("./stargazer_tables/table_s41.html")
Score
(1)(2)(3)(4)(5)(6)
Porosity Scale0.62 (0.56, 0.68)0.36 (0.29, 0.44)0.32 (0.25, 0.39)0.33 (0.25, 0.40)
p = 0.00p = 0.00p = 0.00p = 0.00
Absorption0.20 (0.12, 0.28)0.20 (0.14, 0.26)0.15 (0.07, 0.22)0.14 (0.07, 0.22)
p = 0.0000004p = 0.00p = 0.0001p = 0.0002
Porosity Scale × Absorption0.02 (-0.05, 0.09)0.02 (-0.04, 0.09)
p = 0.57p = 0.49
Scale: Spiritual Events-0.001 (-0.04, 0.03)-0.001 (-0.04, 0.03)-0.002 (-0.05, 0.05)-0.001 (-0.03, 0.03)-0.01 (-0.06, 0.04)-0.004 (-0.06, 0.05)
p = 0.94p = 0.94p = 0.94p = 0.98p = 0.81p = 0.88
Country: Gh.0.62 (0.49, 0.75)0.83 (0.72, 0.94)0.65 (0.52, 0.78)0.62 (0.49, 0.76)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.24 (-0.36, -0.13)-0.29 (-0.39, -0.18)-0.26 (-0.37, -0.14)-0.25 (-0.37, -0.12)
p = 0.00004p = 0.0000002p = 0.00002p = 0.0001
Country: Ch.-0.57 (-0.73, -0.41)-0.86 (-0.97, -0.75)-0.63 (-0.80, -0.46)-0.61 (-0.78, -0.44)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.38 (0.19, 0.57)0.62 (0.51, 0.74)0.42 (0.22, 0.61)0.38 (0.18, 0.58)
p = 0.0002p = 0.00p = 0.00004p = 0.0003
Scale: Spiritual Events × Country: Gh.-0.07 (-0.16, 0.01)-0.02 (-0.08, 0.05)-0.05 (-0.14, 0.03)-0.06 (-0.14, 0.03)
p = 0.10p = 0.65p = 0.24p = 0.23
Scale: Spiritual Events × Country: Th.-0.12 (-0.20, -0.04)-0.12 (-0.18, -0.05)-0.13 (-0.21, -0.05)-0.13 (-0.21, -0.05)
p = 0.003p = 0.001p = 0.002p = 0.002
Scale: Spiritual Events × Country: Ch.0.13 (0.02, 0.23)0.20 (0.13, 0.27)0.09 (-0.02, 0.21)0.09 (-0.02, 0.21)
p = 0.02p = 0.00p = 0.11p = 0.13
Scale: Spiritual Events × Country: Va.-0.02 (-0.15, 0.10)-0.14 (-0.21, -0.07)0.01 (-0.13, 0.14)0.01 (-0.12, 0.15)
p = 0.72p = 0.0002p = 0.94p = 0.87
Scale: Spiritual Events × Porosity Scale-0.05 (-0.08, -0.01)-0.01 (-0.06, 0.03)-0.03 (-0.08, 0.02)-0.03 (-0.08, 0.02)
p = 0.01p = 0.57p = 0.21p = 0.20
Gender: male0.02 (-0.04, 0.08)
p = 0.51
Age0.05 (-0.01, 0.11)
p = 0.13
Scale: Spiritual Events × Absorption0.04 (0.01, 0.08)0.04 (0.01, 0.08)0.06 (0.01, 0.11)0.06 (0.01, 0.11)
p = 0.02p = 0.02p = 0.02p = 0.02
Country: Gh. × Porosity Scale-0.10 (-0.22, 0.03)-0.08 (-0.20, 0.05)-0.08 (-0.21, 0.05)
p = 0.14p = 0.25p = 0.22
Country: Th. × Porosity Scale-0.02 (-0.16, 0.11)-0.03 (-0.16, 0.10)-0.04 (-0.17, 0.10)
p = 0.73p = 0.64p = 0.58
Country: Ch. × Porosity Scale0.06 (-0.09, 0.21)0.04 (-0.12, 0.20)0.03 (-0.13, 0.19)
p = 0.43p = 0.59p = 0.73
Country: Va. × Porosity Scale-0.17 (-0.34, 0.01)-0.16 (-0.34, 0.02)-0.15 (-0.33, 0.03)
p = 0.07p = 0.09p = 0.11
Scale: Spiritual Events × Country: Gh. × Porosity Scale0.12 (0.03, 0.20)0.13 (0.04, 0.22)0.13 (0.04, 0.22)
p = 0.01p = 0.004p = 0.004
Scale: Spiritual Events × Country: Th. × Porosity Scale-0.001 (-0.09, 0.09)0.02 (-0.07, 0.11)0.02 (-0.07, 0.11)
p = 0.98p = 0.70p = 0.72
Scale: Spiritual Events × Country: Ch. × Porosity Scale-0.07 (-0.17, 0.03)-0.09 (-0.20, 0.02)-0.09 (-0.20, 0.02)
p = 0.17p = 0.10p = 0.11
Scale: Spiritual Events × Country: Va. × Porosity Scale-0.11 (-0.22, 0.01)-0.11 (-0.23, 0.01)-0.12 (-0.24, 0.003)
p = 0.08p = 0.07p = 0.06
Country: Gh. × Absorption-0.04 (-0.16, 0.07)-0.01 (-0.13, 0.11)-0.01 (-0.13, 0.12)
p = 0.45p = 0.87p = 0.93
Country: Th. × Absorption0.03 (-0.07, 0.14)0.05 (-0.07, 0.16)0.05 (-0.06, 0.17)
p = 0.54p = 0.43p = 0.39
Country: Ch. × Absorption-0.03 (-0.15, 0.08)0.01 (-0.16, 0.18)0.01 (-0.16, 0.18)
p = 0.57p = 0.88p = 0.92
Country: Va. × Absorption-0.07 (-0.18, 0.05)-0.09 (-0.28, 0.10)-0.10 (-0.29, 0.10)
p = 0.26p = 0.38p = 0.33
Scale: Spiritual Events × Country: Gh. × Absorption0.01 (-0.06, 0.08)-0.004 (-0.09, 0.08)-0.004 (-0.09, 0.08)
p = 0.80p = 0.93p = 0.93
Scale: Spiritual Events × Country: Th. × Absorption-0.04 (-0.11, 0.02)-0.05 (-0.12, 0.03)-0.05 (-0.12, 0.03)
p = 0.20p = 0.25p = 0.26
Scale: Spiritual Events × Country: Ch. × Absorption-0.01 (-0.08, 0.06)0.03 (-0.08, 0.15)0.03 (-0.08, 0.15)
p = 0.86p = 0.59p = 0.59
Scale: Spiritual Events × Country: Va. × Absorption0.01 (-0.07, 0.08)0.004 (-0.13, 0.13)-0.005 (-0.14, 0.13)
p = 0.88p = 0.96p = 0.95
Scale: Spiritual Events × Porosity Scale × Absorption0.01 (-0.03, 0.06)0.02 (-0.03, 0.06)
p = 0.54p = 0.49
Country: Gh. × Porosity Scale × Absorption-0.09 (-0.21, 0.03)-0.09 (-0.21, 0.03)
p = 0.16p = 0.16
Country: Th. × Porosity Scale × Absorption0.02 (-0.11, 0.15)0.02 (-0.11, 0.15)
p = 0.80p = 0.79
Country: Ch. × Porosity Scale × Absorption0.06 (-0.09, 0.21)0.04 (-0.11, 0.19)
p = 0.44p = 0.60
Country: Va. × Porosity Scale × Absorption0.04 (-0.14, 0.21)0.04 (-0.13, 0.21)
p = 0.69p = 0.66
Scale: Spiritual Events × Country: Gh. × Porosity Scale × Absorption-0.08 (-0.16, 0.01)-0.08 (-0.16, 0.004)
p = 0.07p = 0.07
Scale: Spiritual Events × Country: Th. × Porosity Scale × Absorption0.07 (-0.02, 0.15)0.07 (-0.02, 0.15)
p = 0.15p = 0.15
Scale: Spiritual Events × Country: Ch. × Porosity Scale × Absorption0.02 (-0.08, 0.12)0.02 (-0.08, 0.12)
p = 0.67p = 0.72
Scale: Spiritual Events × Country: Va. × Porosity Scale × Absorption-0.01 (-0.13, 0.10)-0.01 (-0.13, 0.11)
p = 0.82p = 0.85
Constant-0.001 (-0.06, 0.06)-0.001 (-0.08, 0.08)0.07 (-0.001, 0.15)0.02 (-0.04, 0.07)0.06 (-0.01, 0.14)0.07 (-0.01, 0.14)
p = 0.97p = 0.98p = 0.06p = 0.56p = 0.10p = 0.10
Observations1,0081,0081,0081,0081,008978
Log Likelihood-1,133.48-1,275.26-1,066.20-1,113.46-1,089.04-1,069.60
Akaike Inf. Crit.2,278.962,562.522,176.402,270.932,262.092,227.21
Bayesian Inf. Crit.2,308.462,592.012,284.552,379.082,468.552,442.17
rsq_table_fun(list(#r03_spirit, 
  r04_spirit, r05_spirit, #r06_spirit,
  r07_spirit, r08_spirit, #r09_spirit, 
  r10_spirit, #r11_spirit, 
  r12_spirit))
R-squared Type (1) (2) (3) (4) (5) (6)
Marginal 0.38 0.04 0.51 0.45 0.53 0.53
Conditional 0.67 0.67 0.70 0.70 0.71 0.70

Table S42. Study 4, measures of spiritual presence events: relationships with Porosity Vignettes and Absorption (sample as random effect)

r13_spirit <- lmer(Score ~ Scale
                   + (1 | Country/subject_id),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r14_spirit <- lmer(Score ~ Scale * `Porosity Vignettes`
                   + (1 | Country/subject_id),
                   # + (1 + `Porosity Vignettes` | Country), # adding to above, failed to converge
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r15_spirit <- lmer(Score ~ Scale * `Porosity Scale`
                   + (1 | Country/subject_id),
                   # + (1 + `Porosity Scale` | Country), # adding to above, perfectly correlated ranfx
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r16_spirit <- lmer(Score ~ Scale * Absorption
                   + (1 | Country/subject_id),
                   # + (1 + Absorption | Country), # adding to above, perfectly correlated ranfx
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r17_spirit <- lmer(Score ~ Scale * `Porosity Vignettes` * Absorption
                   + (1 | Country/subject_id),
                   # + (1 + `Porosity Vignettes` * Absorption | Country), # adding to above, perfectly correlated ranfx
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r18_spirit <- lmer(Score ~ Scale * `Porosity Scale` * Absorption
                   + (1 | Country/subject_id), 
                   # + (1 + `Porosity Scale` * Absorption | Country), # adding to above, perfectly correlated ranfx
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r19_spirit <- lmer(Score ~ Scale * `Porosity Vignettes` * Absorption
                   + Gender + Age
                   + (1 | Country/subject_id),
                   # + (1 + `Porosity Vignettes` * Absorption + Gender + Age | Country),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)

r20_spirit <- lmer(Score ~ Scale * `Porosity Scale` * Absorption
                   + Gender + Age
                   + (1 | Country/subject_id),
                   # + (1 + `Porosity Scale` * Absorption + Gender + Age | Country),
                   control = lmerControl(optimizer = "bobyqa"),
                   data = d4_fortab_long_spirit)
table_s42 <- stargazer(r13_spirit, r14_spirit, #r15_spirit,
                       r16_spirit, r17_spirit, #r18_spirit,
                       r19_spirit, #r20_spirit,
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Vignettes`$",
                                 "^Absorption$",
                                 "^`Porosity Vignettes`:Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s42), 
    file = "./stargazer_tables/table_s42.html")
htmltools::includeHTML("./stargazer_tables/table_s42.html")
Score
(1)(2)(3)(4)(5)
Porosity Vignettes0.29 (0.23, 0.36)0.25 (0.19, 0.32)0.26 (0.19, 0.32)
p = 0.00p = 0.00p = 0.00
Absorption0.20 (0.15, 0.26)0.15 (0.10, 0.20)0.15 (0.09, 0.20)
p = 0.00p = 0.0000001p = 0.0000002
Porosity Vignettes × Absorption-0.03 (-0.08, 0.03)-0.02 (-0.07, 0.04)
p = 0.33p = 0.51
Scale: Spiritual Events-0.001 (-0.04, 0.03)-0.001 (-0.04, 0.03)-0.001 (-0.04, 0.03)-0.0004 (-0.04, 0.04)0.002 (-0.04, 0.04)
p = 0.96p = 0.96p = 0.97p = 0.99p = 0.94
Scale: Spiritual Events × Porosity Vignettes0.01 (-0.03, 0.04)-0.003 (-0.04, 0.03)-0.0002 (-0.04, 0.04)
p = 0.74p = 0.88p = 1.00
Gender: male-0.01 (-0.07, 0.04)
p = 0.63
Age0.06 (-0.003, 0.13)
p = 0.06
Scale: Spiritual Events × Absorption0.04 (0.01, 0.08)0.04 (0.01, 0.08)0.04 (0.003, 0.08)
p = 0.02p = 0.02p = 0.04
Scale: Spiritual Events × Porosity Vignettes × Absorption-0.002 (-0.04, 0.03)-0.002 (-0.04, 0.03)
p = 0.91p = 0.91
Constant0.02 (-0.60, 0.63)0.01 (-0.46, 0.48)0.02 (-0.60, 0.63)0.02 (-0.47, 0.51)0.01 (-0.45, 0.47)
p = 0.96p = 0.97p = 0.96p = 0.95p = 0.97
Observations1,0081,0081,0081,008978
Log Likelihood-1,137.87-1,104.88-1,116.83-1,098.85-1,078.25
Akaike Inf. Crit.2,285.742,223.762,247.672,219.712,182.49
Bayesian Inf. Crit.2,310.322,258.172,282.082,273.782,246.00
rsq_table_fun(list(r13_spirit, r14_spirit, #r15_spirit,
                   r16_spirit, r17_spirit, #r18_spirit,
                   r19_spirit #, r20_spirit
))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.0 0.09 0.04 0.11 0.12
Conditional 0.7 0.64 0.70 0.65 0.64

Table S43. Study 4, measures of spiritual presence events: relationships with Porosity Scale and Absorption (sample as random effect)

table_s43 <- stargazer(r13_spirit, #r14_spirit, 
                       r15_spirit, r16_spirit, #r17_spirit, 
                       r18_spirit, #r19_spirit, 
                       r20_spirit,
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Scale`$",
                                 "^Absorption$",
                                 "^`Porosity Scale`:Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s43), 
    file = "./stargazer_tables/table_s43.html")
htmltools::includeHTML("./stargazer_tables/table_s43.html")
Score
(1)(2)(3)(4)(5)
Porosity Scale0.41 (0.34, 0.47)0.36 (0.30, 0.43)0.37 (0.30, 0.44)
p = 0.00p = 0.00p = 0.00
Absorption0.20 (0.15, 0.26)0.13 (0.08, 0.19)0.13 (0.08, 0.19)
p = 0.00p = 0.0000005p = 0.000002
Porosity Scale × Absorption-0.002 (-0.05, 0.05)-0.002 (-0.05, 0.05)
p = 0.94p = 0.95
Scale: Spiritual Events-0.001 (-0.04, 0.03)-0.001 (-0.04, 0.03)-0.001 (-0.04, 0.03)-0.004 (-0.04, 0.03)-0.002 (-0.04, 0.03)
p = 0.96p = 0.96p = 0.97p = 0.85p = 0.91
Scale: Spiritual Events × Porosity Scale-0.05 (-0.08, -0.01)-0.06 (-0.09, -0.02)-0.06 (-0.09, -0.02)
p = 0.02p = 0.002p = 0.004
Gender: male0.03 (-0.03, 0.08)
p = 0.35
Age0.05 (-0.01, 0.11)
p = 0.11
Scale: Spiritual Events × Absorption0.04 (0.01, 0.08)0.05 (0.02, 0.09)0.05 (0.01, 0.09)
p = 0.02p = 0.004p = 0.01
Scale: Spiritual Events × Porosity Scale × Absorption0.01 (-0.02, 0.05)0.01 (-0.02, 0.05)
p = 0.41p = 0.45
Constant0.02 (-0.60, 0.63)0.01 (-0.38, 0.39)0.02 (-0.60, 0.63)0.01 (-0.40, 0.41)0.01 (-0.37, 0.39)
p = 0.96p = 0.98p = 0.96p = 0.97p = 0.95
Observations1,0081,0081,0081,008978
Log Likelihood-1,137.87-1,076.95-1,116.83-1,071.59-1,051.97
Akaike Inf. Crit.2,285.742,167.902,247.672,165.182,129.93
Bayesian Inf. Crit.2,310.322,202.312,282.082,219.262,193.44
rsq_table_fun(list(r13_spirit, #r14_spirit, 
                   r15_spirit, r16_spirit, #r17_spirit, 
                   r18_spirit, #r19_spirit 
                   r20_spirit
))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.0 0.19 0.04 0.20 0.22
Conditional 0.7 0.62 0.70 0.63 0.62

Table S44. Study 4, measures of spiritual presence events: relationships with Porosity Vignettes by country

r21_spirit_us <- lmer(Score ~ Scale * `Porosity Vignettes` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "US") %>%
                        mutate_at(vars(Score, `Porosity Vignettes`), ~ scale(.)))

r21_spirit_gh <- lmer(Score ~ Scale * `Porosity Vignettes` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Ghana") %>%
                        mutate_at(vars(Score, ,`Porosity Vignettes`), ~ scale(.)))

r21_spirit_th <- lmer(Score ~ Scale * `Porosity Vignettes` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Thailand") %>%
                        mutate_at(vars(Score, `Porosity Vignettes`), ~ scale(.)))

r21_spirit_ch <- lmer(Score ~ Scale * `Porosity Vignettes` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "China") %>%
                        mutate_at(vars(Score, `Porosity Vignettes`), ~ scale(.)))

r21_spirit_vt <- lmer(Score ~ Scale * `Porosity Vignettes` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Vanuatu") %>%
                        mutate_at(vars(Score, `Porosity Vignettes`), ~ scale(.)))
table_s44 <- stargazer(r21_spirit_us, r21_spirit_gh, r21_spirit_th, 
                       r21_spirit_ch, r21_spirit_vt, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Vignettes`$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s44), 
    file = "./stargazer_tables/table_s44.html")
htmltools::includeHTML("./stargazer_tables/table_s44.html")
Score
(1)(2)(3)(4)(5)
Porosity Vignettes0.53 (0.38, 0.67)0.17 (0.02, 0.33)0.28 (0.13, 0.44)0.34 (0.19, 0.48)0.12 (-0.05, 0.28)
p = 0.00p = 0.03p = 0.0003p = 0.00001p = 0.18
Scale: Spiritual Events0.07 (-0.01, 0.14)-0.02 (-0.13, 0.10)-0.18 (-0.26, -0.09)0.33 (0.23, 0.43)-0.20 (-0.31, -0.08)
p = 0.08p = 0.77p = 0.0001p = 0.00p = 0.001
Scale: Spiritual Events × Porosity Vignettes0.13 (0.05, 0.20)0.13 (0.01, 0.24)0.04 (-0.05, 0.13)-0.08 (-0.17, 0.02)0.01 (-0.10, 0.13)
p = 0.001p = 0.04p = 0.36p = 0.12p = 0.87
Constant-0.00 (-0.15, 0.15)-0.003 (-0.16, 0.15)-0.00 (-0.15, 0.15)-0.0001 (-0.14, 0.14)0.00 (-0.16, 0.16)
p = 1.00p = 0.97p = 1.00p = 1.00p = 1.00
Observations204199222199184
Log Likelihood-238.99-280.13-292.61-255.25-256.66
Akaike Inf. Crit.489.98572.26597.23522.50525.33
Bayesian Inf. Crit.509.89592.02617.64542.26544.62
rsq_table_fun(list(r21_spirit_us, r21_spirit_gh, r21_spirit_th, 
                   r21_spirit_ch, r21_spirit_vt))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.30 0.05 0.11 0.23 0.05
Conditional 0.71 0.32 0.56 0.53 0.38

Table S45. Study 4, measures of spiritual presence events: relationships with Porosity Scale by country

r22_spirit_us <- lmer(Score ~ Scale * `Porosity Scale` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "US") %>%
                        mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))

r22_spirit_gh <- lmer(Score ~ Scale * `Porosity Scale` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Ghana") %>%
                        mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))

r22_spirit_th <- lmer(Score ~ Scale * `Porosity Scale` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Thailand") %>%
                        mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))

r22_spirit_ch <- lmer(Score ~ Scale * `Porosity Scale` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "China") %>%
                        mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))

r22_spirit_vt <- lmer(Score ~ Scale * `Porosity Scale` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Vanuatu") %>%
                        mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))
table_s45 <- stargazer(r22_spirit_us, r22_spirit_gh, r22_spirit_th, 
                       r22_spirit_ch, r22_spirit_vt, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Scale`$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s45), 
    file = "./stargazer_tables/table_s45.html")
htmltools::includeHTML("./stargazer_tables/table_s45.html")
Score
(1)(2)(3)(4)(5)
Porosity Scale0.56 (0.41, 0.70)0.27 (0.12, 0.42)0.40 (0.25, 0.54)0.47 (0.34, 0.60)0.16 (-0.002, 0.32)
p = 0.00p = 0.0004p = 0.0000001p = 0.00p = 0.06
Scale: Spiritual Events0.07 (-0.01, 0.15)-0.02 (-0.13, 0.10)-0.18 (-0.27, -0.09)0.33 (0.23, 0.43)-0.20 (-0.31, -0.08)
p = 0.09p = 0.77p = 0.0001p = 0.00p = 0.001
Scale: Spiritual Events × Porosity Scale0.04 (-0.03, 0.12)0.10 (-0.01, 0.22)-0.02 (-0.11, 0.07)-0.09 (-0.19, 0.002)-0.10 (-0.21, 0.02)
p = 0.27p = 0.09p = 0.70p = 0.06p = 0.10
Constant0.00 (-0.14, 0.14)-0.003 (-0.15, 0.15)-0.00 (-0.14, 0.14)-0.001 (-0.13, 0.13)0.00 (-0.16, 0.16)
p = 1.00p = 0.97p = 1.00p = 1.00p = 1.00
Observations204199222199184
Log Likelihood-241.07-277.32-286.41-243.43-254.39
Akaike Inf. Crit.494.14566.64584.81498.86520.79
Bayesian Inf. Crit.514.05586.40605.23518.62540.08
rsq_table_fun(list(r22_spirit_us, r22_spirit_gh, r22_spirit_th, 
                   r22_spirit_ch, r22_spirit_vt))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.31 0.08 0.19 0.34 0.07
Conditional 0.68 0.31 0.55 0.53 0.40

Table S46. Study 4, measures of spiritual presence events: relationships with Absorption by country

r23_spirit_us <- lmer(Score ~ Scale * `Absorption` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "US") %>%
                        mutate_at(vars(Score, `Absorption`), ~ scale(.)))

r23_spirit_gh <- lmer(Score ~ Scale * `Absorption` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Ghana") %>%
                        mutate_at(vars(Score, `Absorption`), ~ scale(.)))

r23_spirit_th <- lmer(Score ~ Scale * `Absorption` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Thailand") %>%
                        mutate_at(vars(Score, `Absorption`), ~ scale(.)))

r23_spirit_ch <- lmer(Score ~ Scale * `Absorption` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "China") %>%
                        mutate_at(vars(Score, `Absorption`), ~ scale(.)))

r23_spirit_vt <- lmer(Score ~ Scale * `Absorption` 
                      + (1 | subject_id),
                      control = lmerControl(optimizer = "bobyqa"),
                      data = d4_fortab_long_spirit %>% filter(Country == "Vanuatu") %>%
                        mutate_at(vars(Score, `Absorption`), ~ scale(.)))
table_s46 <- stargazer(r23_spirit_us, r23_spirit_gh, r23_spirit_th, 
                       r23_spirit_ch, r23_spirit_vt, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s46), 
    file = "./stargazer_tables/table_s46.html")
htmltools::includeHTML("./stargazer_tables/table_s46.html")
Score
(1)(2)(3)(4)(5)
Absorption0.30 (0.13, 0.47)0.18 (0.03, 0.34)0.36 (0.21, 0.50)0.28 (0.13, 0.43)0.19 (0.03, 0.35)
p = 0.0005p = 0.03p = 0.000003p = 0.0003p = 0.03
Scale: Spiritual Events0.07 (-0.01, 0.15)-0.02 (-0.14, 0.10)-0.18 (-0.27, -0.09)0.33 (0.24, 0.43)-0.20 (-0.31, -0.08)
p = 0.09p = 0.77p = 0.0001p = 0.00p = 0.001
Scale: Spiritual Events × Absorption0.08 (0.001, 0.15)0.06 (-0.06, 0.18)0.001 (-0.09, 0.09)0.06 (-0.03, 0.16)0.07 (-0.04, 0.18)
p = 0.05p = 0.31p = 0.99p = 0.21p = 0.23
Constant-0.00 (-0.17, 0.17)-0.003 (-0.16, 0.15)-0.00 (-0.15, 0.15)0.002 (-0.15, 0.15)0.00 (-0.16, 0.16)
p = 1.00p = 0.97p = 1.00p = 0.98p = 1.00
Observations204199222199184
Log Likelihood-257.02-281.60-289.18-258.75-254.37
Akaike Inf. Crit.526.03575.21590.36529.50520.74
Bayesian Inf. Crit.545.94594.97610.78549.26540.03
rsq_table_fun(list(r23_spirit_us, r23_spirit_gh, r23_spirit_th, 
                   r23_spirit_ch, r23_spirit_vt))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.10 0.04 0.16 0.19 0.08
Conditional 0.69 0.29 0.55 0.52 0.39

Relationships: Secular anomalous events

Setup

# longform dataframe
d4_fortab_long_secular <- d4_abs_omit %>% 
  gather(Scale, Score, 
         c(Hallucinations, Paranormal)) %>%
  mutate(Scale = factor(Scale))
# set contrasts
contrasts(d4_fortab_long_secular$Country) <- cbind(": Gh." = c(-1, 1, 0, 0, 0),
                                                   ": Th." = c(-1, 0, 1, 0, 0),
                                                   ": Ch." = c(-1, 0, 0, 1, 0),
                                                   ": Va." = c(-1, 0, 0, 0, 1))
contrasts(d4_fortab_long_secular$Gender) <- cbind(": male" = c(-1, 1))
contrasts(d4_fortab_long_secular$Scale) <- cbind(": Hallucinations" = c(1, -1))

Table S47. Study 4, measures of secular anomalous events: relationships with Porosity Vignettes and Absorption (sample as fixed effect)

r03_secular <- lmer(Score ~ Scale * `Porosity Vignettes`
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r04_secular <- lmer(Score ~ Scale * `Porosity Scale`
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r05_secular <- lmer(Score ~ Scale * Absorption
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r06_secular <- lmer(Score ~ Scale * Country * `Porosity Vignettes`
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r07_secular <- lmer(Score ~ Scale * Country * `Porosity Scale`
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r08_secular <- lmer(Score ~ Scale * Country * Absorption
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r09_secular <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * Absorption
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r10_secular <- lmer(Score ~ Scale * Country * `Porosity Scale` * Absorption
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r11_secular <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * Absorption
                    + Gender + Age
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r12_secular <- lmer(Score ~ Scale * Country * `Porosity Scale` * Absorption
                    + Gender + Age
                    + (1 | subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)
table_s47 <- stargazer(r03_secular, #r04_secular, 
                       r05_secular, r06_secular, #r07_secular, 
                       r08_secular, r09_secular, #r10_secular,
                       r11_secular, #r12_secular, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Vignettes`$",
                                 "^Absorption$",
                                 "^`Porosity Vignettes`:Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T) 
cat(sub_interact_fun(table_s47), 
    file = "./stargazer_tables/table_s47.html")
htmltools::includeHTML("./stargazer_tables/table_s47.html")
Score
(1)(2)(3)(4)(5)(6)
Porosity Vignettes0.31 (0.24, 0.37)0.34 (0.26, 0.41)0.26 (0.19, 0.34)0.26 (0.19, 0.34)
p = 0.00p = 0.00p = 0.00p = 0.00
Absorption0.34 (0.27, 0.40)0.33 (0.27, 0.40)0.32 (0.24, 0.39)0.30 (0.22, 0.37)
p = 0.00p = 0.00p = 0.00p = 0.00
Porosity Vignettes × Absorption-0.002 (-0.08, 0.07)0.01 (-0.06, 0.08)
p = 0.96p = 0.81
Scale: Hallucinations0.00 (-0.05, 0.05)0.00 (-0.05, 0.05)-0.07 (-0.13, -0.01)0.002 (-0.05, 0.05)-0.06 (-0.13, -0.0001)-0.07 (-0.13, -0.001)
p = 1.00p = 1.00p = 0.03p = 0.96p = 0.05p = 0.05
Country: Gh.0.01 (-0.13, 0.16)0.24 (0.12, 0.37)0.07 (-0.07, 0.21)0.12 (-0.03, 0.26)
p = 0.85p = 0.0002p = 0.32p = 0.12
Country: Th.-0.31 (-0.44, -0.18)-0.25 (-0.37, -0.13)-0.34 (-0.46, -0.22)-0.35 (-0.48, -0.23)
p = 0.000004p = 0.00003p = 0.0000001p = 0.00000004
Country: Ch.0.24 (0.06, 0.42)-0.09 (-0.22, 0.03)0.20 (0.04, 0.37)0.20 (0.03, 0.37)
p = 0.01p = 0.14p = 0.02p = 0.02
Country: Va.-0.12 (-0.29, 0.05)-0.01 (-0.14, 0.11)-0.08 (-0.24, 0.08)-0.05 (-0.21, 0.12)
p = 0.17p = 0.84p = 0.33p = 0.56
Scale: Hallucinations × Country: Gh.0.11 (-0.01, 0.23)0.09 (-0.02, 0.19)0.10 (-0.02, 0.22)0.10 (-0.02, 0.23)
p = 0.09p = 0.10p = 0.12p = 0.12
Scale: Hallucinations × Country: Th.-0.12 (-0.23, -0.02)-0.17 (-0.27, -0.08)-0.12 (-0.23, -0.01)-0.12 (-0.23, -0.01)
p = 0.03p = 0.001p = 0.04p = 0.04
Scale: Hallucinations × Country: Ch.-0.26 (-0.41, -0.12)-0.07 (-0.18, 0.03)-0.27 (-0.42, -0.12)-0.27 (-0.42, -0.12)
p = 0.0005p = 0.16p = 0.0004p = 0.0004
Scale: Hallucinations × Country: Va.-0.04 (-0.17, 0.10)-0.08 (-0.19, 0.02)-0.04 (-0.18, 0.10)-0.03 (-0.18, 0.12)
p = 0.60p = 0.13p = 0.58p = 0.69
Scale: Hallucinations × Porosity Vignettes-0.01 (-0.07, 0.04)-0.07 (-0.13, -0.005)-0.07 (-0.14, -0.01)-0.07 (-0.14, -0.01)
p = 0.60p = 0.04p = 0.03p = 0.04
Gender: male-0.06 (-0.12, 0.005)
p = 0.08
Age-0.05 (-0.12, 0.02)
p = 0.17
Scale: Hallucinations × Absorption0.01 (-0.04, 0.07)0.01 (-0.04, 0.06)0.02 (-0.05, 0.08)0.02 (-0.05, 0.09)
p = 0.63p = 0.61p = 0.61p = 0.59
Country: Gh. × Porosity Vignettes-0.12 (-0.26, 0.01)-0.10 (-0.23, 0.03)-0.10 (-0.22, 0.03)
p = 0.08p = 0.12p = 0.13
Country: Th. × Porosity Vignettes-0.12 (-0.27, 0.02)-0.15 (-0.28, -0.01)-0.15 (-0.29, -0.02)
p = 0.10p = 0.04p = 0.03
Country: Ch. × Porosity Vignettes0.28 (0.09, 0.47)0.32 (0.14, 0.49)0.30 (0.12, 0.48)
p = 0.005p = 0.001p = 0.001
Country: Va. × Porosity Vignettes-0.33 (-0.50, -0.15)-0.31 (-0.47, -0.14)-0.33 (-0.50, -0.16)
p = 0.0003p = 0.0003p = 0.0002
Scale: Hallucinations × Country: Gh. × Porosity Vignettes0.16 (0.05, 0.27)0.15 (0.04, 0.27)0.15 (0.04, 0.27)
p = 0.005p = 0.01p = 0.01
Scale: Hallucinations × Country: Th. × Porosity Vignettes-0.05 (-0.16, 0.07)-0.04 (-0.16, 0.08)-0.04 (-0.16, 0.08)
p = 0.43p = 0.51p = 0.51
Scale: Hallucinations × Country: Ch. × Porosity Vignettes-0.30 (-0.46, -0.15)-0.30 (-0.46, -0.14)-0.29 (-0.45, -0.13)
p = 0.0002p = 0.0003p = 0.0004
Scale: Hallucinations × Country: Va. × Porosity Vignettes0.11 (-0.03, 0.26)0.11 (-0.03, 0.26)0.12 (-0.04, 0.27)
p = 0.12p = 0.13p = 0.14
Country: Gh. × Absorption-0.09 (-0.21, 0.04)-0.07 (-0.20, 0.07)-0.05 (-0.18, 0.08)
p = 0.17p = 0.33p = 0.47
Country: Th. × Absorption-0.01 (-0.13, 0.11)-0.01 (-0.14, 0.11)0.001 (-0.12, 0.12)
p = 0.91p = 0.83p = 0.99
Country: Ch. × Absorption-0.03 (-0.16, 0.09)0.07 (-0.12, 0.25)0.09 (-0.09, 0.27)
p = 0.62p = 0.49p = 0.33
Country: Va. × Absorption-0.11 (-0.23, 0.02)-0.04 (-0.20, 0.12)-0.05 (-0.22, 0.11)
p = 0.11p = 0.65p = 0.53
Scale: Hallucinations × Country: Gh. × Absorption0.05 (-0.05, 0.15)0.02 (-0.10, 0.14)0.02 (-0.10, 0.14)
p = 0.33p = 0.73p = 0.75
Scale: Hallucinations × Country: Th. × Absorption-0.04 (-0.13, 0.06)-0.02 (-0.13, 0.09)-0.02 (-0.13, 0.09)
p = 0.48p = 0.73p = 0.73
Scale: Hallucinations × Country: Ch. × Absorption-0.01 (-0.11, 0.09)0.02 (-0.15, 0.18)0.01 (-0.15, 0.18)
p = 0.82p = 0.86p = 0.89
Scale: Hallucinations × Country: Va. × Absorption-0.01 (-0.12, 0.10)-0.001 (-0.14, 0.14)0.03 (-0.12, 0.18)
p = 0.86p = 1.00p = 0.73
Scale: Hallucinations × Porosity Vignettes × Absorption-0.02 (-0.09, 0.04)-0.02 (-0.09, 0.04)
p = 0.53p = 0.49
Country: Gh. × Porosity Vignettes × Absorption-0.11 (-0.23, 0.01)-0.13 (-0.25, -0.003)
p = 0.08p = 0.05
Country: Th. × Porosity Vignettes × Absorption0.04 (-0.09, 0.18)0.03 (-0.11, 0.16)
p = 0.55p = 0.69
Country: Ch. × Porosity Vignettes × Absorption0.14 (-0.05, 0.34)0.13 (-0.06, 0.32)
p = 0.15p = 0.17
Country: Va. × Porosity Vignettes × Absorption-0.07 (-0.22, 0.09)-0.05 (-0.21, 0.11)
p = 0.41p = 0.56
Scale: Hallucinations × Country: Gh. × Porosity Vignettes × Absorption0.04 (-0.07, 0.15)0.04 (-0.07, 0.16)
p = 0.46p = 0.44
Scale: Hallucinations × Country: Th. × Porosity Vignettes × Absorption-0.04 (-0.16, 0.08)-0.04 (-0.16, 0.08)
p = 0.49p = 0.52
Scale: Hallucinations × Country: Ch. × Porosity Vignettes × Absorption0.04 (-0.13, 0.21)0.05 (-0.12, 0.22)
p = 0.66p = 0.59
Scale: Hallucinations × Country: Va. × Porosity Vignettes × Absorption-0.004 (-0.14, 0.14)-0.03 (-0.18, 0.12)
p = 0.96p = 0.70
Constant-0.00 (-0.06, 0.06)0.00 (-0.06, 0.06)0.10 (0.03, 0.18)0.005 (-0.06, 0.07)0.11 (0.03, 0.18)0.09 (0.02, 0.16)
p = 1.00p = 1.00p = 0.01p = 0.88p = 0.004p = 0.02
Observations1,0101,0101,0101,0101,010980
Log Likelihood-1,380.61-1,372.19-1,351.32-1,365.54-1,347.04-1,307.43
Akaike Inf. Crit.2,773.232,756.372,746.632,775.072,778.082,702.87
Bayesian Inf. Crit.2,802.742,785.882,854.822,883.262,984.622,917.92
rsq_table_fun(list(r03_secular, #r04_secular, 
                   r05_secular, r06_secular, #r07_secular, 
                   r08_secular, r09_secular, #r10_secular,
                   r11_secular #, r12_secular 
))
R-squared Type (1) (2) (3) (4) (5) (6)
Marginal 0.09 0.11 0.20 0.18 0.27 0.27
Conditional 0.29 0.29 0.36 0.33 0.36 0.34

Table S48. Study 4, measures of secular anomalous events: relationships with Porosity Scale and Absorption (sample as fixed effect)

table_s48 <- stargazer(#r03_secular, 
  r04_secular, r05_secular, #r06_secular,
  r07_secular, r08_secular, #r09_secular, 
  r10_secular, #r11_secular, 
  r12_secular, 
  type = "html",
  ci = T,
  report = c("vcsp"),
  digits = 2,
  digits.extra = 1000,
  omit.table.layout = "n",
  order = c("^`Porosity Scale`$",
            "^Absorption$",
            "^`Porosity Scale`:Absorption$"),
  # dep.var.labels.include = F,
  dep.var.caption = "",
  single.row = T) 
cat(sub_interact_fun(table_s48), 
    file = "./stargazer_tables/table_s48.html")
htmltools::includeHTML("./stargazer_tables/table_s48.html")
Score
(1)(2)(3)(4)(5)(6)
Porosity Scale0.33 (0.26, 0.39)0.45 (0.37, 0.53)0.37 (0.29, 0.45)0.36 (0.28, 0.45)
p = 0.00p = 0.00p = 0.00p = 0.00
Absorption0.34 (0.27, 0.40)0.33 (0.27, 0.40)0.27 (0.19, 0.35)0.26 (0.18, 0.34)
p = 0.00p = 0.00p = 0.00p = 0.00
Porosity Scale × Absorption0.05 (-0.03, 0.12)0.04 (-0.04, 0.12)
p = 0.25p = 0.32
Scale: Hallucinations-0.00 (-0.05, 0.05)0.00 (-0.05, 0.05)-0.10 (-0.17, -0.03)0.002 (-0.05, 0.05)-0.12 (-0.19, -0.04)-0.11 (-0.19, -0.04)
p = 1.00p = 1.00p = 0.005p = 0.96p = 0.003p = 0.004
Country: Gh.0.05 (-0.10, 0.20)0.24 (0.12, 0.37)0.11 (-0.03, 0.25)0.15 (0.004, 0.30)
p = 0.54p = 0.0002p = 0.13p = 0.05
Country: Th.-0.25 (-0.38, -0.11)-0.25 (-0.37, -0.13)-0.27 (-0.40, -0.14)-0.27 (-0.41, -0.14)
p = 0.0004p = 0.00003p = 0.00004p = 0.0001
Country: Ch.0.39 (0.21, 0.58)-0.09 (-0.22, 0.03)0.33 (0.14, 0.51)0.31 (0.12, 0.50)
p = 0.00004p = 0.14p = 0.001p = 0.002
Country: Va.-0.42 (-0.64, -0.19)-0.01 (-0.14, 0.11)-0.35 (-0.57, -0.14)-0.33 (-0.55, -0.11)
p = 0.0003p = 0.84p = 0.002p = 0.004
Scale: Hallucinations × Country: Gh.0.20 (0.08, 0.32)0.09 (-0.02, 0.19)0.23 (0.10, 0.36)0.23 (0.10, 0.36)
p = 0.002p = 0.10p = 0.0005p = 0.001
Scale: Hallucinations × Country: Th.-0.13 (-0.24, -0.02)-0.17 (-0.27, -0.08)-0.12 (-0.24, -0.01)-0.13 (-0.24, -0.01)
p = 0.03p = 0.001p = 0.04p = 0.04
Scale: Hallucinations × Country: Ch.-0.35 (-0.51, -0.20)-0.07 (-0.18, 0.03)-0.41 (-0.58, -0.24)-0.41 (-0.58, -0.24)
p = 0.00001p = 0.16p = 0.000002p = 0.000003
Scale: Hallucinations × Country: Va.-0.05 (-0.24, 0.13)-0.08 (-0.19, 0.02)-0.05 (-0.24, 0.15)-0.03 (-0.23, 0.16)
p = 0.58p = 0.13p = 0.64p = 0.74
Scale: Hallucinations × Porosity Scale-0.07 (-0.12, -0.01)-0.13 (-0.20, -0.06)-0.15 (-0.22, -0.07)-0.15 (-0.22, -0.08)
p = 0.02p = 0.0003p = 0.0001p = 0.0001
Gender: male-0.01 (-0.08, 0.05)
p = 0.65
Age-0.06 (-0.13, 0.01)
p = 0.10
Scale: Hallucinations × Absorption0.01 (-0.04, 0.07)0.01 (-0.04, 0.06)0.06 (-0.02, 0.13)0.05 (-0.02, 0.13)
p = 0.63p = 0.61p = 0.14p = 0.17
Country: Gh. × Porosity Scale-0.27 (-0.42, -0.13)-0.25 (-0.38, -0.11)-0.24 (-0.38, -0.10)
p = 0.0003p = 0.001p = 0.001
Country: Th. × Porosity Scale-0.10 (-0.25, 0.06)-0.09 (-0.24, 0.05)-0.09 (-0.24, 0.05)
p = 0.23p = 0.22p = 0.22
Country: Ch. × Porosity Scale0.26 (0.08, 0.44)0.25 (0.07, 0.43)0.25 (0.07, 0.43)
p = 0.005p = 0.01p = 0.01
Country: Va. × Porosity Scale-0.12 (-0.33, 0.08)-0.11 (-0.30, 0.09)-0.10 (-0.30, 0.10)
p = 0.25p = 0.28p = 0.34
Scale: Hallucinations × Country: Gh. × Porosity Scale0.11 (-0.01, 0.23)0.11 (-0.01, 0.24)0.12 (-0.01, 0.24)
p = 0.07p = 0.08p = 0.08
Scale: Hallucinations × Country: Th. × Porosity Scale-0.08 (-0.20, 0.05)-0.06 (-0.19, 0.07)-0.06 (-0.20, 0.07)
p = 0.24p = 0.36p = 0.36
Scale: Hallucinations × Country: Ch. × Porosity Scale-0.34 (-0.49, -0.19)-0.39 (-0.55, -0.23)-0.38 (-0.54, -0.22)
p = 0.00001p = 0.000002p = 0.000004
Scale: Hallucinations × Country: Va. × Porosity Scale0.21 (0.04, 0.38)0.23 (0.05, 0.41)0.23 (0.05, 0.41)
p = 0.02p = 0.02p = 0.02
Country: Gh. × Absorption-0.09 (-0.21, 0.04)-0.004 (-0.14, 0.13)0.003 (-0.13, 0.14)
p = 0.17p = 0.96p = 0.97
Country: Th. × Absorption-0.01 (-0.13, 0.11)0.04 (-0.09, 0.16)0.04 (-0.09, 0.17)
p = 0.91p = 0.58p = 0.53
Country: Ch. × Absorption-0.03 (-0.16, 0.09)-0.07 (-0.26, 0.12)-0.05 (-0.24, 0.14)
p = 0.62p = 0.48p = 0.60
Country: Va. × Absorption-0.11 (-0.23, 0.02)-0.15 (-0.36, 0.06)-0.15 (-0.37, 0.06)
p = 0.11p = 0.16p = 0.16
Scale: Hallucinations × Country: Gh. × Absorption0.05 (-0.05, 0.15)0.03 (-0.09, 0.15)0.04 (-0.09, 0.16)
p = 0.33p = 0.60p = 0.56
Scale: Hallucinations × Country: Th. × Absorption-0.04 (-0.13, 0.06)-0.04 (-0.15, 0.08)-0.03 (-0.15, 0.08)
p = 0.48p = 0.53p = 0.59
Scale: Hallucinations × Country: Ch. × Absorption-0.01 (-0.11, 0.09)0.11 (-0.05, 0.28)0.12 (-0.05, 0.29)
p = 0.82p = 0.19p = 0.18
Scale: Hallucinations × Country: Va. × Absorption-0.01 (-0.12, 0.10)-0.08 (-0.27, 0.11)-0.06 (-0.26, 0.13)
p = 0.86p = 0.40p = 0.53
Scale: Hallucinations × Porosity Scale × Absorption0.01 (-0.05, 0.08)0.01 (-0.06, 0.08)
p = 0.70p = 0.81
Country: Gh. × Porosity Scale × Absorption-0.14 (-0.27, -0.01)-0.14 (-0.27, -0.01)
p = 0.04p = 0.04
Country: Th. × Porosity Scale × Absorption0.07 (-0.07, 0.21)0.08 (-0.06, 0.22)
p = 0.32p = 0.29
Country: Ch. × Porosity Scale × Absorption-0.02 (-0.18, 0.15)-0.004 (-0.17, 0.16)
p = 0.86p = 0.97
Country: Va. × Porosity Scale × Absorption0.04 (-0.15, 0.23)0.04 (-0.15, 0.23)
p = 0.67p = 0.66
Scale: Hallucinations × Country: Gh. × Porosity Scale × Absorption-0.05 (-0.17, 0.06)-0.05 (-0.17, 0.07)
p = 0.37p = 0.42
Scale: Hallucinations × Country: Th. × Porosity Scale × Absorption0.02 (-0.10, 0.15)0.03 (-0.10, 0.16)
p = 0.73p = 0.63
Scale: Hallucinations × Country: Ch. × Porosity Scale × Absorption0.05 (-0.10, 0.20)0.06 (-0.09, 0.21)
p = 0.52p = 0.44
Scale: Hallucinations × Country: Va. × Porosity Scale × Absorption0.01 (-0.16, 0.18)0.002 (-0.17, 0.17)
p = 0.94p = 0.98
Constant0.00 (-0.06, 0.06)0.00 (-0.06, 0.06)0.10 (0.01, 0.18)0.005 (-0.06, 0.07)0.08 (0.002, 0.17)0.08 (-0.004, 0.16)
p = 1.00p = 1.00p = 0.03p = 0.88p = 0.05p = 0.07
Observations1,0101,0101,0101,0101,010980
Log Likelihood-1,371.56-1,372.19-1,328.58-1,365.54-1,319.94-1,290.48
Akaike Inf. Crit.2,755.122,756.372,701.172,775.072,723.892,668.97
Bayesian Inf. Crit.2,784.632,785.882,809.362,883.262,930.432,884.02
rsq_table_fun(list(#r03_secular, 
  r04_secular, r05_secular, #r06_secular,
  r07_secular, r08_secular, #r09_secular, 
  r10_secular, #r11_secular, 
  r12_secular))
R-squared Type (1) (2) (3) (4) (5) (6)
Marginal 0.11 0.11 0.23 0.18 0.31 0.30
Conditional 0.30 0.29 0.38 0.33 0.38 0.37

Table S49. Study 4, measures of secular anomalous events: relationships with Porosity Vignettes and Absorption (sample as random effect)

r13_secular <- lmer(Score ~ Scale
                    + (1 | Country/subject_id),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r14_secular <- lmer(Score ~ Scale * `Porosity Vignettes`
                    + (1 | Country/subject_id),
                    # + (1 + `Porosity Vignettes` | Country), # adding to above, failed to converge
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r15_secular <- lmer(Score ~ Scale * `Porosity Scale`
                    + (1 | Country/subject_id),
                    # + (1 + `Porosity Scale` | Country), # adding to above, perfectly correlated ranfx
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r16_secular <- lmer(Score ~ Scale * Absorption
                    + (1 | Country/subject_id),
                    # + (1 + Absorption | Country), # adding to above, perfectly correlated ranfx
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r17_secular <- lmer(Score ~ Scale * `Porosity Vignettes` * Absorption
                    + (1 | Country/subject_id),
                    # + (1 + `Porosity Vignettes` * Absorption | Country), # adding to above, perfectly correlated ranfx
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r18_secular <- lmer(Score ~ Scale * `Porosity Scale` * Absorption
                    + (1 | Country/subject_id), 
                    # + (1 + `Porosity Scale` * Absorption | Country), # adding to above, perfectly correlated ranfx
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r19_secular <- lmer(Score ~ Scale * `Porosity Vignettes` * Absorption
                    + Gender + Age
                    + (1 | Country/subject_id),
                    # + (1 + `Porosity Vignettes` * Absorption + Gender + Age | Country),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)

r20_secular <- lmer(Score ~ Scale * `Porosity Scale` * Absorption
                    + Gender + Age
                    + (1 | Country/subject_id),
                    # + (1 + `Porosity Scale` * Absorption + Gender + Age | Country),
                    control = lmerControl(optimizer = "bobyqa"),
                    data = d4_fortab_long_secular)
table_s49 <- stargazer(r13_secular, r14_secular, #r15_secular,
                       r16_secular, r17_secular, #r18_secular,
                       r19_secular, #r20_secular,
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Vignettes`$",
                                 "^Absorption$",
                                 "^`Porosity Vignettes`:Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s49), 
    file = "./stargazer_tables/table_s49.html")
htmltools::includeHTML("./stargazer_tables/table_s49.html")
Score
(1)(2)(3)(4)(5)
Porosity Vignettes0.35 (0.27, 0.42)0.27 (0.20, 0.34)0.27 (0.21, 0.34)
p = 0.00p = 0.00p = 0.00
Absorption0.34 (0.27, 0.40)0.28 (0.22, 0.34)0.27 (0.21, 0.33)
p = 0.00p = 0.00p = 0.00
Porosity Vignettes × Absorption-0.04 (-0.10, 0.02)-0.04 (-0.10, 0.02)
p = 0.16p = 0.23
Scale: Hallucinations0.00 (-0.05, 0.05)0.00 (-0.05, 0.05)0.00 (-0.05, 0.05)0.001 (-0.05, 0.05)-0.002 (-0.06, 0.05)
p = 1.00p = 1.00p = 1.00p = 0.99p = 0.94
Scale: Hallucinations × Porosity Vignettes-0.01 (-0.07, 0.04)-0.02 (-0.07, 0.04)-0.02 (-0.07, 0.04)
p = 0.60p = 0.52p = 0.58
Gender: male-0.05 (-0.11, 0.01)
p = 0.12
Age-0.05 (-0.12, 0.02)
p = 0.16
Scale: Hallucinations × Absorption0.01 (-0.04, 0.07)0.02 (-0.04, 0.07)0.01 (-0.05, 0.06)
p = 0.63p = 0.55p = 0.76
Scale: Hallucinations × Porosity Vignettes × Absorption-0.003 (-0.06, 0.05)-0.0002 (-0.05, 0.05)
p = 0.91p = 1.00
Constant0.004 (-0.16, 0.17)-0.0005 (-0.17, 0.17)0.004 (-0.16, 0.17)0.01 (-0.15, 0.17)-0.01 (-0.16, 0.15)
p = 0.97p = 1.00p = 0.97p = 0.91p = 0.93
Observations1,0101,0101,0101,010980
Log Likelihood-1,408.91-1,373.09-1,363.37-1,344.00-1,304.54
Akaike Inf. Crit.2,827.822,760.182,740.752,710.002,635.09
Bayesian Inf. Crit.2,852.412,794.602,775.172,764.092,698.63
rsq_table_fun(list(r13_secular, r14_secular, #r15_secular,
                   r16_secular, r17_secular, #r18_secular,
                   r19_secular #, r20_secular
))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.00 0.12 0.11 0.18 0.18
Conditional 0.29 0.31 0.29 0.30 0.28

Table S50. Study 4, measures of secular anomalous events: relationships with Porosity Scale and Absorption (sample as random effect)

table_s50 <- stargazer(r13_secular, #r14_secular, 
                       r15_secular, r16_secular, #r17_secular, 
                       r18_secular, #r19_secular, 
                       r20_secular,
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Scale`$",
                                 "^Absorption$",
                                 "^`Porosity Scale`:Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s50), 
    file = "./stargazer_tables/table_s50.html")
htmltools::includeHTML("./stargazer_tables/table_s50.html")
Score
(1)(2)(3)(4)(5)
Porosity Scale0.45 (0.37, 0.53)0.37 (0.29, 0.44)0.35 (0.28, 0.43)
p = 0.00p = 0.00p = 0.00
Absorption0.34 (0.27, 0.40)0.27 (0.21, 0.33)0.26 (0.20, 0.32)
p = 0.00p = 0.00p = 0.00
Porosity Scale × Absorption0.01 (-0.05, 0.06)-0.005 (-0.06, 0.05)
p = 0.80p = 0.87
Scale: Hallucinations0.00 (-0.05, 0.05)-0.00 (-0.05, 0.05)0.00 (-0.05, 0.05)-0.0004 (-0.05, 0.05)-0.003 (-0.06, 0.05)
p = 1.00p = 1.00p = 1.00p = 0.99p = 0.90
Scale: Hallucinations × Porosity Scale-0.07 (-0.12, -0.01)-0.07 (-0.12, -0.02)-0.07 (-0.12, -0.02)
p = 0.02p = 0.01p = 0.02
Gender: male-0.01 (-0.08, 0.05)
p = 0.65
Age-0.06 (-0.13, 0.01)
p = 0.08
Scale: Hallucinations × Absorption0.01 (-0.04, 0.07)0.03 (-0.03, 0.08)0.02 (-0.04, 0.07)
p = 0.63p = 0.34p = 0.50
Scale: Hallucinations × Porosity Scale × Absorption0.002 (-0.05, 0.05)0.001 (-0.05, 0.05)
p = 0.93p = 0.97
Constant0.004 (-0.16, 0.17)-0.005 (-0.26, 0.25)0.004 (-0.16, 0.17)-0.005 (-0.22, 0.21)-0.01 (-0.20, 0.19)
p = 0.97p = 0.97p = 0.97p = 0.97p = 0.94
Observations1,0101,0101,0101,010980
Log Likelihood-1,408.91-1,353.88-1,363.37-1,326.72-1,291.91
Akaike Inf. Crit.2,827.822,721.762,740.752,675.442,609.82
Bayesian Inf. Crit.2,852.412,756.182,775.172,729.532,673.36
rsq_table_fun(list(r13_secular, #r14_secular, 
                   r15_secular, r16_secular, #r17_secular, 
                   r18_secular, #r19_secular 
                   r20_secular
))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.00 0.18 0.11 0.23 0.22
Conditional 0.29 0.37 0.29 0.35 0.32

Table S51. Study 4, measures of secular anomalous events: relationships with Porosity Vignettes by country

r21_secular_us <- lmer(Score ~ Scale * `Porosity Vignettes` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "US") %>%
                         mutate_at(vars(Score, `Porosity Vignettes`), ~ scale(.)))

r21_secular_gh <- lmer(Score ~ Scale * `Porosity Vignettes` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Ghana") %>%
                         mutate_at(vars(Score, ,`Porosity Vignettes`), ~ scale(.)))

r21_secular_th <- lmer(Score ~ Scale * `Porosity Vignettes` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Thailand") %>%
                         mutate_at(vars(Score, `Porosity Vignettes`), ~ scale(.)))

r21_secular_ch <- lmer(Score ~ Scale * `Porosity Vignettes` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "China") %>%
                         mutate_at(vars(Score, `Porosity Vignettes`), ~ scale(.)))

r21_secular_vt <- lmer(Score ~ Scale * `Porosity Vignettes` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Vanuatu") %>%
                         mutate_at(vars(Score, `Porosity Vignettes`), ~ scale(.)))
table_s51 <- stargazer(r21_secular_us, r21_secular_gh, r21_secular_th, 
                       r21_secular_ch, r21_secular_vt, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Vignettes`$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s51), 
    file = "./stargazer_tables/table_s51.html")
htmltools::includeHTML("./stargazer_tables/table_s51.html")
Score
(1)(2)(3)(4)(5)
Porosity Vignettes0.53 (0.41, 0.66)0.21 (0.07, 0.35)0.21 (0.06, 0.35)0.39 (0.26, 0.52)0.01 (-0.16, 0.17)
p = 0.00p = 0.003p = 0.005p = 0.00p = 0.93
Scale: Hallucinations0.20 (0.09, 0.30)0.09 (-0.04, 0.22)-0.20 (-0.30, -0.09)-0.08 (-0.19, 0.04)-0.10 (-0.22, 0.02)
p = 0.0002p = 0.18p = 0.0002p = 0.19p = 0.12
Scale: Hallucinations × Porosity Vignettes0.01 (-0.09, 0.11)0.09 (-0.04, 0.22)-0.11 (-0.22, -0.01)-0.24 (-0.35, -0.12)0.04 (-0.08, 0.16)
p = 0.90p = 0.18p = 0.04p = 0.0001p = 0.53
Constant-0.00 (-0.13, 0.13)-0.00 (-0.14, 0.14)-0.00 (-0.14, 0.14)-0.00 (-0.13, 0.13)-0.00 (-0.17, 0.17)
p = 1.00p = 1.00p = 1.00p = 1.00p = 1.00
Observations204200222200184
Log Likelihood-254.85-283.67-305.06-265.61-261.90
Akaike Inf. Crit.521.70579.33622.12543.22535.81
Bayesian Inf. Crit.541.61599.12642.53563.01555.10
rsq_table_fun(list(r21_secular_us, r21_secular_gh, r21_secular_th, 
                   r21_secular_ch, r21_secular_vt))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.32 0.06 0.09 0.21 0.01
Conditional 0.46 0.12 0.38 0.32 0.31

Table S52. Study 4, measures of secular anomalous events: relationships with Porosity Scale by country

r22_secular_us <- lmer(Score ~ Scale * `Porosity Scale` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "US") %>%
                         mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))

r22_secular_gh <- lmer(Score ~ Scale * `Porosity Scale` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Ghana") %>%
                         mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))

r22_secular_th <- lmer(Score ~ Scale * `Porosity Scale` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Thailand") %>%
                         mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))

r22_secular_ch <- lmer(Score ~ Scale * `Porosity Scale` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "China") %>%
                         mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))

r22_secular_vt <- lmer(Score ~ Scale * `Porosity Scale` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Vanuatu") %>%
                         mutate_at(vars(Score, `Porosity Scale`), ~ scale(.)))
table_s52 <- stargazer(r22_secular_us, r22_secular_gh, r22_secular_th, 
                       r22_secular_ch, r22_secular_vt, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Porosity Scale`$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s52), 
    file = "./stargazer_tables/table_s52.html")
htmltools::includeHTML("./stargazer_tables/table_s52.html")
Score
(1)(2)(3)(4)(5)
Porosity Scale0.52 (0.40, 0.65)0.16 (0.01, 0.30)0.31 (0.18, 0.45)0.49 (0.37, 0.61)0.23 (0.07, 0.39)
p = 0.00p = 0.04p = 0.00001p = 0.00p = 0.01
Scale: Hallucinations0.20 (0.09, 0.30)0.09 (-0.04, 0.22)-0.20 (-0.30, -0.10)-0.08 (-0.18, 0.03)-0.10 (-0.22, 0.02)
p = 0.0002p = 0.18p = 0.0002p = 0.16p = 0.12
Scale: Hallucinations × Porosity Scale-0.02 (-0.13, 0.08)-0.01 (-0.15, 0.12)-0.18 (-0.28, -0.08)-0.32 (-0.43, -0.22)0.05 (-0.07, 0.18)
p = 0.64p = 0.84p = 0.0005p = 0.00p = 0.38
Constant-0.00 (-0.13, 0.13)-0.00 (-0.14, 0.14)0.00 (-0.14, 0.14)-0.00 (-0.12, 0.12)-0.00 (-0.16, 0.16)
p = 1.00p = 1.00p = 1.00p = 1.00p = 1.00
Observations204200222200184
Log Likelihood-255.66-286.66-296.13-246.83-257.99
Akaike Inf. Crit.523.33585.33604.27505.65527.97
Bayesian Inf. Crit.543.24605.12624.68525.44547.26
rsq_table_fun(list(r22_secular_us, r22_secular_gh, r22_secular_th, 
                   r22_secular_ch, r22_secular_vt))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.31 0.03 0.17 0.35 0.06
Conditional 0.46 0.11 0.42 0.42 0.32

Table S53. Study 4, measures of secular anomalous events: relationships with Absorption by country

r23_secular_us <- lmer(Score ~ Scale * `Absorption` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "US") %>%
                         mutate_at(vars(Score, `Absorption`), ~ scale(.)))

r23_secular_gh <- lmer(Score ~ Scale * `Absorption` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Ghana") %>%
                         mutate_at(vars(Score, `Absorption`), ~ scale(.)))

r23_secular_th <- lmer(Score ~ Scale * `Absorption` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Thailand") %>%
                         mutate_at(vars(Score, `Absorption`), ~ scale(.)))

r23_secular_ch <- lmer(Score ~ Scale * `Absorption` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "China") %>%
                         mutate_at(vars(Score, `Absorption`), ~ scale(.)))

r23_secular_vt <- lmer(Score ~ Scale * `Absorption` 
                       + (1 | subject_id),
                       control = lmerControl(optimizer = "bobyqa"),
                       data = d4_fortab_long_secular %>% filter(Country == "Vanuatu") %>%
                         mutate_at(vars(Score, `Absorption`), ~ scale(.)))
table_s53 <- stargazer(r23_secular_us, r23_secular_gh, r23_secular_th, 
                       r23_secular_ch, r23_secular_vt, 
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^Absorption$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s53), 
    file = "./stargazer_tables/table_s53.html")
htmltools::includeHTML("./stargazer_tables/table_s53.html")
Score
(1)(2)(3)(4)(5)
Absorption0.45 (0.31, 0.59)0.25 (0.11, 0.39)0.38 (0.25, 0.51)0.32 (0.18, 0.46)0.28 (0.12, 0.43)
p = 0.00p = 0.0004p = 0.00000003p = 0.00001p = 0.001
Scale: Hallucinations0.20 (0.09, 0.30)0.09 (-0.04, 0.22)-0.20 (-0.31, -0.09)-0.08 (-0.20, 0.05)-0.10 (-0.22, 0.02)
p = 0.0002p = 0.18p = 0.0003p = 0.23p = 0.12
Scale: Hallucinations × Absorption0.02 (-0.09, 0.12)0.07 (-0.06, 0.20)-0.03 (-0.13, 0.08)0.001 (-0.12, 0.13)0.005 (-0.12, 0.13)
p = 0.76p = 0.33p = 0.64p = 0.99p = 0.95
Constant-0.00 (-0.14, 0.14)-0.00 (-0.14, 0.14)0.00 (-0.13, 0.13)-0.00 (-0.14, 0.14)-0.00 (-0.16, 0.16)
p = 1.00p = 1.00p = 1.00p = 1.00p = 1.00
Observations204200222200184
Log Likelihood-263.58-282.35-297.18-278.38-256.45
Akaike Inf. Crit.539.16576.69606.37568.76524.89
Bayesian Inf. Crit.559.06596.48626.78588.55544.18
rsq_table_fun(list(r23_secular_us, r23_secular_gh, r23_secular_th, 
                   r23_secular_ch, r23_secular_vt))
R-squared Type (1) (2) (3) (4) (5)
Marginal 0.24 0.08 0.18 0.11 0.08
Conditional 0.46 0.11 0.35 0.21 0.31

Exploratory factor analyses

Study 1

All sites

d1_abs <- d1_byq %>%
  select(subject_id, ends_with("_abs")) %>%
  column_to_rownames("subject_id")
fa.parallel(d1_abs)
Parallel analysis suggests that the number of factors =  4  and the number of components =  3 

d1_all_efa <- fa(d1_abs, nfactors = 4, rotate = "oblimin")
Loading required namespace: GPArotation
d1_all_loadings <- d1_all_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d1_all_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 1: All sites", x = "factor", y = "question")

US

d1_abs_us <- d1_byq %>%
  filter(country == "US") %>%
  select(subject_id, ends_with("_abs")) %>%
  column_to_rownames("subject_id")
fa.parallel(d1_abs_us)
Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.The estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.NaNs produceddiag(.) had 0 or NA entries; non-finite result is doubtful
Parallel analysis suggests that the number of factors =  3  and the number of components =  1 

d1_us_efa <- fa(d1_abs, nfactors = 3, rotate = "oblimin")
d1_us_loadings <- d1_us_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d1_us_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 1: US", x = "factor", y = "question")

Ghana

d1_abs_gh <- d1_byq %>%
  filter(country == "Ghana") %>%
  select(subject_id, ends_with("_abs")) %>%
  column_to_rownames("subject_id")
fa.parallel(d1_abs_gh)
Parallel analysis suggests that the number of factors =  2  and the number of components =  2 

d1_gh_efa <- fa(d1_abs, nfactors = 2, rotate = "oblimin")
d1_gh_loadings <- d1_gh_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d1_gh_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 1: Ghana", x = "factor", y = "question")

Thailand

d1_abs_th <- d1_byq %>%
  filter(country == "Thailand") %>%
  select(subject_id, ends_with("_abs")) %>%
  column_to_rownames("subject_id")
fa.parallel(d1_abs_th)
Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.
Parallel analysis suggests that the number of factors =  1  and the number of components =  1 

d1_th_efa <- fa(d1_abs, nfactors = 1, rotate = "oblimin")
d1_th_loadings <- d1_th_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d1_th_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 1: Thailand", x = "factor", y = "question")

China

d1_abs_ch <- d1_byq %>%
  filter(country == "China") %>%
  select(subject_id, ends_with("_abs")) %>%
  column_to_rownames("subject_id")
fa.parallel(d1_abs_ch)
The estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.Matrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.
Parallel analysis suggests that the number of factors =  1  and the number of components =  1 

d1_ch_efa <- fa(d1_abs, nfactors = 1, rotate = "oblimin")
d1_ch_loadings <- d1_ch_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d1_ch_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 1: China", x = "factor", y = "question")

Vanuatu

d1_abs_vt <- d1_byq %>%
  filter(country == "Vanuatu") %>%
  select(subject_id, ends_with("_abs")) %>%
  column_to_rownames("subject_id")
fa.parallel(d1_abs_vt)
the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
the standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
the standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
the standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was donethe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was donethe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was donethe standard deviation is zeroIn smc, smcs < 0 were set to .0
the standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was donethe standard deviation is zeroThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was doneIn smc, smcs < 0 were set to .0
Matrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.the standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zerothe standard deviation is zeroMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneMatrix was not positive definite, smoothing was doneThe estimated weights for the factor scores are probably incorrect.  Try a different factor score estimation method.
Parallel analysis suggests that the number of factors =  5  and the number of components =  4 

d1_vt_efa <- fa(d1_abs, nfactors = 5, rotate = "oblimin")
d1_vt_loadings <- d1_vt_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d1_vt_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 1: Vanuatu", x = "factor", y = "question")

Study 3

All sites

d3_abs <- d3_byq %>%
  select(subj, question, response) %>%
  filter(question %in% c("exwl_01", "exwl_02", "exwl_03", "exwl_04", "exwl_05", "exwl_06",
                         "exwl_07", "exwl_08", "exwl_09", "exwl_10", "exwl_11", "exwl_12",
                         "exwl_13", "exwl_14", "exwl_15", "exwl_16", "exwl_17", "exwl_18",
                         "exwl_19", "exwl_20", "exwl_21", "exwl_22", "exwl_23", "exwl_24",
                         "exwl_25", "exwl_26", "exwl_27", "exwl_28", "exwl_29", "exwl_30",
                         "exwl_31", "exwl_32", "exwl_33", "exwl_34")) %>%
  mutate(question = factor(
    question,
    levels = c("exwl_01", "exwl_02", "exwl_03", "exwl_04", 
               "exwl_05", "exwl_06", "exwl_07", "exwl_08", 
               "exwl_09", "exwl_10", "exwl_11", "exwl_12",
               "exwl_13", "exwl_14", "exwl_15", "exwl_16", 
               "exwl_17", "exwl_18", "exwl_19", "exwl_20", 
               "exwl_21", "exwl_22", "exwl_23", "exwl_24",
               "exwl_25", "exwl_26", "exwl_27", "exwl_28", 
               "exwl_29", "exwl_30", "exwl_31", "exwl_32", 
               "exwl_33", "exwl_34"),
    labels = c("childexp", "poeticlanguage", "forgetsurrounding", "starepicture", 
               "mindenvelopworld", "cloudshapes", "vividdaydream", "mysticalexp", 
               "stepoutsidemyself", "textures", "doublyreal", "caughtupinmusic", 
               "heavybody", "sensepresence", "woodfireimagine", "immersednature", 
               "colormeaning", "wanderthoughtstask", "clearpastexp", "meaninglesstoothers", 
               "actinginplay", "visualthoughts", "delightsmallthings", "organmusic", 
               "changenoise", "vividsmellmemories", "synesthesiasound", "predictwords", 
               "physicalmemories", "fascinatingvoice", "invisiblepresence", "sponthoughtsimages", 
               "synesthesiasmell", "emosunset"))) %>%
  spread(question, response) %>%
  column_to_rownames("subj")
fa.parallel(d3_abs)
Parallel analysis suggests that the number of factors =  5  and the number of components =  4 

d3_all_efa <- fa(d3_abs, nfactors = 6, rotate = "oblimin")
d3_all_loadings <- d3_all_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d3_all_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 3: All sites", x = "factor", y = "question")

US

d3_abs_us <- d3_abs %>%
  rownames_to_column("subj") %>%
  filter(subj %in% c(d3_byq %>% filter(ctry == "us") %>% distinct(subj) %>% pull(subj))) %>%
  column_to_rownames("subj")
fa.parallel(d3_abs_us)
Parallel analysis suggests that the number of factors =  4  and the number of components =  3 

d3_us_efa <- fa(d3_abs, nfactors = 4, rotate = "oblimin")
d3_us_loadings <- d3_us_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d3_us_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 3: US", x = "factor", y = "question")

Ghana

d3_abs_gh <- d3_abs %>%
  rownames_to_column("subj") %>%
  filter(subj %in% c(d3_byq %>% filter(ctry == "ghana") %>% distinct(subj) %>% pull(subj))) %>%
  column_to_rownames("subj")
fa.parallel(d3_abs_gh)
Parallel analysis suggests that the number of factors =  2  and the number of components =  1 

d3_gh_efa <- fa(d3_abs, nfactors = 2, rotate = "oblimin")
d3_gh_loadings <- d3_gh_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d3_gh_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 3: Ghana", x = "factor", y = "question")

Thailand

d3_abs_th <- d3_abs %>%
  rownames_to_column("subj") %>%
  filter(subj %in% c(d3_byq %>% filter(ctry == "thailand") %>% distinct(subj) %>% pull(subj))) %>%
  column_to_rownames("subj")
fa.parallel(d3_abs_th)
Parallel analysis suggests that the number of factors =  1  and the number of components =  1 

d3_th_efa <- fa(d3_abs, nfactors = 1, rotate = "oblimin")
d3_th_loadings <- d3_th_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d3_th_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 3: Thailand", x = "factor", y = "question")

China

d3_abs_ch <- d3_abs %>%
  rownames_to_column("subj") %>%
  filter(subj %in% c(d3_byq %>% filter(ctry == "china") %>% distinct(subj) %>% pull(subj))) %>%
  column_to_rownames("subj")
fa.parallel(d3_abs_ch)
the standard deviation is zerothe standard deviation is zerothe standard deviation is zero
Parallel analysis suggests that the number of factors =  2  and the number of components =  2 

d3_ch_efa <- fa(d3_abs, nfactors = 2, rotate = "oblimin")
d3_ch_loadings <- d3_ch_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d3_ch_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 3: China", x = "factor", y = "question")

Vanuatu

d3_abs_vt <- d3_abs %>%
  rownames_to_column("subj") %>%
  filter(subj %in% c(d3_byq %>% filter(ctry == "vanuatu") %>% distinct(subj) %>% pull(subj))) %>%
  column_to_rownames("subj")
fa.parallel(d3_abs_vt)
Parallel analysis suggests that the number of factors =  2  and the number of components =  2 

d3_vt_efa <- fa(d3_abs, nfactors = 2, rotate = "oblimin")
d3_vt_loadings <- d3_vt_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d3_vt_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 3: Vanuatu", x = "factor", y = "question")

Study 4

All sites

d4_abs <- d4_byq %>%
  select(p7_subj, contains("_abs_")) %>%
  select(-ends_with("cat"), -ends_with("total"), -contains("_check")) %>%
  column_to_rownames("p7_subj")
fa.parallel(d4_abs)
Parallel analysis suggests that the number of factors =  4  and the number of components =  3 

d4_all_efa <- fa(d4_abs, nfactors = 4, rotate = "oblimin")
d4_all_loadings <- d4_all_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d4_all_loadings %>%
  mutate(question = gsub("_abs", "", question),
         question = gsub("p7_", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 4: All sites", x = "factor", y = "question")

US

d4_abs_us <- d4_abs %>%
  rownames_to_column("p7_subj") %>%
  filter(p7_subj %in% c(d4_byq %>% 
                          filter(p7_ctry == "US") %>% 
                          distinct(p7_subj) %>% 
                          pull(p7_subj))) %>%
  column_to_rownames("p7_subj")
fa.parallel(d4_abs_us)
Parallel analysis suggests that the number of factors =  2  and the number of components =  2 
There were 45 warnings (use warnings() to see them)

d4_us_efa <- fa(d4_abs_us, nfactors = 2, rotate = "oblimin")
d4_us_loadings <- d4_us_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d4_us_loadings %>%
  mutate(question = gsub("_abs", "", question),
         question = gsub("p7_", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 4: US", x = "factor", y = "question")

Ghana

d4_abs_gh <- d4_abs %>%
  rownames_to_column("p7_subj") %>%
  filter(p7_subj %in% c(d4_byq %>% 
                          filter(p7_ctry == "Ghana") %>% 
                          distinct(p7_subj) %>% 
                          pull(p7_subj))) %>%
  column_to_rownames("p7_subj")
fa.parallel(d4_abs_gh)
Parallel analysis suggests that the number of factors =  4  and the number of components =  1 

d4_gh_efa <- fa(d4_abs_gh, nfactors = 4, rotate = "oblimin")
d4_gh_loadings <- d4_gh_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d4_gh_loadings %>%
  mutate(question = gsub("_abs", "", question),
         question = gsub("p7_", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 4: Ghana", x = "factor", y = "question")

Thailand

d4_abs_th <- d4_abs %>%
  rownames_to_column("p7_subj") %>%
  filter(p7_subj %in% c(d4_byq %>% 
                          filter(p7_ctry == "Thailand") %>% 
                          distinct(p7_subj) %>% 
                          pull(p7_subj))) %>%
  column_to_rownames("p7_subj")
fa.parallel(d4_abs_th)
the standard deviation is zero
Parallel analysis suggests that the number of factors =  1  and the number of components =  1 

d4_th_efa <- fa(d4_abs_th, nfactors = 1, rotate = "oblimin")
d4_th_loadings <- d4_th_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d4_th_loadings %>%
  mutate(question = gsub("_abs", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 4: Thailand", x = "factor", y = "question")

China

d4_abs_ch <- d4_abs %>%
  rownames_to_column("p7_subj") %>%
  filter(p7_subj %in% c(d4_byq %>% 
                          filter(p7_ctry == "China") %>% 
                          distinct(p7_subj) %>% 
                          pull(p7_subj))) %>%
  column_to_rownames("p7_subj")
fa.parallel(d4_abs_ch)
the standard deviation is zerothe standard deviation is zerothe standard deviation is zero
Parallel analysis suggests that the number of factors =  1  and the number of components =  1 

d4_ch_efa <- fa(d4_abs_ch, nfactors = 1, rotate = "oblimin")
d4_ch_loadings <- d4_ch_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d4_ch_loadings %>%
  mutate(question = gsub("_abs", "", question),
         question = gsub("p7_", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 4: China", x = "factor", y = "question")

Vanuatu

d4_abs_vt <- d4_abs %>%
  rownames_to_column("p7_subj") %>%
  filter(p7_subj %in% c(d4_byq %>% 
                          filter(p7_ctry == "Vanuatu") %>% 
                          distinct(p7_subj) %>% 
                          pull(p7_subj))) %>%
  column_to_rownames("p7_subj")
fa.parallel(d4_abs_vt)
the standard deviation is zero
Parallel analysis suggests that the number of factors =  6  and the number of components =  1 

d4_vt_efa <- fa(d4_abs_vt, nfactors = 6, rotate = "oblimin")
d4_vt_loadings <- d4_vt_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d4_vt_loadings %>%
  mutate(question = gsub("_abs", "", question),
         question = gsub("p7_", "", question)) %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "Study 4: Vanuatu", x = "factor", y = "question")

All studies

d_all_abs <- d1_abs %>% 
  rename_all(~gsub("_abs", "", .)) %>%
  rownames_to_column("subject_id") %>%
  mutate(study = "s1") %>%
  gather(question, response, -c(study, subject_id)) %>%
  full_join(d3_abs %>%
              rownames_to_column("subject_id") %>%
              mutate(study = "s3") %>%
              gather(question, response, -c(study, subject_id))) %>%
  full_join(d4_abs %>%
              rownames_to_column("subject_id") %>%
              mutate(study = "s4") %>%
              gather(question, response, -c(study, subject_id)) %>%
              mutate(question = recode(question,
                                       "p7_abs_child.exp" = "childexp",
                                       "p7_abs_poetic" = "poeticlanguage", 
                                       "p7_abs_tv.real" = "forgetsurrounding",
                                       "p7_abs_see.image" = "starepicture",
                                       "p7_abs_mind.world" = "mindenvelopworld", 
                                       "p7_abs_clouds" = "cloudshapes", 
                                       "p7_abs_vivid.dreams" = "vividdaydream",
                                       "p7_abs_mystic.exp" = "mysticalexp", 
                                       "p7_abs_step.outside" = "stepoutsidemyself", 
                                       "p7_abs_textures" = "textures", 
                                       "p7_abs_too.real" = "doublyreal", 
                                       "p7_abs_music.attn" = "caughtupinmusic", 
                                       "p7_abs_heavy.body" = "heavybody",
                                       "p7_abs_sense.presc" = "sensepresence",
                                       "p7_abs_fire" = "woodfireimagine", 
                                       "p7_abs_nature.art" = "immersednature", 
                                       "p7_abs_colors" = "colormeaning", 
                                       "p7_abs_thght.wander" = "wanderthoughtstask", 
                                       "p7_abs_vivid.past" = "clearpastexp", 
                                       "p7_abs_makes.sense" = "meaninglesstoothers", 
                                       "p7_abs_become.chctr" = "actinginplay", 
                                       "p7_abs_visual.thghts" = "visualthoughts", 
                                       "p7_abs_small.things" = "delightsmallthings", 
                                       "p7_abs_music.lift" = "organmusic", 
                                       "p7_abs_noise.music" = "changenoise", 
                                       "p7_abs_scented.mem" = "vividsmellmemories", 
                                       "p7_abs_visual.music" = "synesthesiasound", 
                                       "p7_abs_before.said" = "predictwords", 
                                       "p7_abs_physical.mem" = "physicalmemories", 
                                       "p7_abs_voice.sound" = "fascinatingvoice", 
                                       "p7_abs_not.physical" = "invisiblepresence",
                                       "p7_abs_thgts.image" = "sponthoughtsimages", 
                                       "p7_abs_odor.to.color" = "synesthesiasmell",
                                       "p7_abs_sunset" = "emosunset"))) %>%
  unite("study_sub", c(study, subject_id)) %>%
  spread(question, response) %>%
  column_to_rownames("study_sub")
Joining, by = c("subject_id", "study", "question", "response")
Joining, by = c("subject_id", "study", "question", "response")
fa.parallel(d_all_abs)
Parallel analysis suggests that the number of factors =  6  and the number of components =  4 

d_all_all_efa <- fa(d_all_abs, nfactors = 6, rotate = "oblimin")
d_all_all_loadings <- d_all_all_efa$loadings[] %>% 
  fa.sort() %>%
  data.frame() %>%
  rownames_to_column("question") %>%
  mutate(order = 1:nrow(.)) %>%
  gather(factor, loading, -question, -order)
d_all_all_loadings %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  labs(title = "All studies: All sites", x = "factor", y = "question")

d_all_all_scales <- d_all_all_loadings %>%
  group_by(factor) %>% 
  top_n(3, loading) %>%
  ungroup()
d_all_all_loadings %>%
  ggplot(aes(x = factor, y = reorder(question, desc(order)), fill = loading)) +
  geom_tile(color = "black") +
  geom_tile(data = d_all_all_scales %>%
              mutate(factorlab = recode_factor(factor,
                                               "MR1" = "Synesthesia",
                                               "MR2" = "Aesthetic involvement in nature",
                                               "MR3" = "Altered states of consciousness (a)",
                                               "MR4" = "Imaginative involvement",
                                               "MR5" = "Sensed presence",
                                               "MR6" = "Altered states of consciousness (b)")),
            aes(fill = NULL, color = factorlab), alpha = 0, size = 1) +
  geom_text(aes(label = format(round(loading, 2), nsmall = 2)), size = 3) +
  scale_fill_distiller(palette = "RdYlBu", limits = c(-1, 1)) +
  scale_color_brewer(palette = "Set1") +
  labs(title = "All studies: All sites", x = "factor", y = "question",
       fill = "Factor loading", color = "MODTAS factor") +
  theme_minimal()

Subscales

Study 1

Reliability

# reliability
bind_rows(MR1 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s1_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR1") %>% 
                                         pull(question)))),
          MR2 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s1_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR2") %>% 
                                         pull(question)))),
          MR3 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s1_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR3") %>% 
                                         pull(question)))),
          MR4 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s1_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR4") %>% 
                                         pull(question)))),
          MR5 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s1_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR5") %>% 
                                         pull(question)))),
          MR6 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s1_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR6") %>% 
                                         pull(question)))))

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Relationships (analog to Table S20)

d1_abs_subscales <- d1_abs %>%
  rownames_to_column("subject_id") %>%
  gather(question, response, -subject_id) %>%
  mutate(question = gsub("_abs", "", question)) %>%
  left_join(d_all_all_scales %>% distinct(question, factor)) %>% 
  filter(!is.na(factor)) %>%
  mutate(factorlab = recode_factor(factor,
                                   "MR1" = "Synesthesia",
                                   "MR2" = "Aesthetic involvement in nature",
                                   "MR3" = "Altered states of consciousness (a)",
                                   "MR4" = "Imaginative involvement",
                                   "MR5" = "Sensed presence",
                                   "MR6" = "Altered states of consciousness (b)")) %>% 
  group_by(subject_id, factor, factorlab) %>%
  summarise(score = mean(response, na.rm = T)) %>%
  ungroup() %>%
  mutate(subject_id = as.numeric(subject_id)) %>%
  left_join(d1 %>% distinct(subject_id, country)) %>%
  group_by(country, factor, factorlab) %>%
  mutate(score = scale(score)) %>%
  ungroup() %>%
  select(-country, -factor) %>%
  spread(factorlab, score) %>%
  mutate_all(as.numeric) %>%
  left_join(d1_fortab)
Joining, by = "question"
`summarise()` has grouped output by 'subject_id', 'factor'. You can override using the `.groups` argument.
Joining, by = "subject_id"
Joining, by = "subject_id"
# r104_spev <- lm(`Spiritual Events` ~ `Porosity Vignettes`,
#                data = d1_abs_subscales)

r105_spev_MR1 <- lm(`Spiritual Events` ~ Synesthesia,
                    data = d1_abs_subscales)
r105_spev_MR2 <- lm(`Spiritual Events` ~ `Aesthetic involvement in nature`,
                    data = d1_abs_subscales)
r105_spev_MR3 <- lm(`Spiritual Events` ~ `Altered states of consciousness (a)`,
                    data = d1_abs_subscales)
r105_spev_MR4 <- lm(`Spiritual Events` ~ `Imaginative involvement`,
                    data = d1_abs_subscales)
r105_spev_MR5 <- lm(`Spiritual Events` ~ `Sensed presence`,
                    data = d1_abs_subscales)
r105_spev_MR6 <- lm(`Spiritual Events` ~ `Altered states of consciousness (b)`,
                    data = d1_abs_subscales)

r106_spev_MR1 <- lm(`Spiritual Events` ~ `Porosity Vignettes` * Synesthesia,
                    data = d1_abs_subscales)
r106_spev_MR2 <- lm(`Spiritual Events` ~ `Porosity Vignettes` * `Aesthetic involvement in nature`,
                    data = d1_abs_subscales)
r106_spev_MR3 <- lm(`Spiritual Events` ~ `Porosity Vignettes` * `Altered states of consciousness (a)`,
                    data = d1_abs_subscales)
r106_spev_MR4 <- lm(`Spiritual Events` ~ `Porosity Vignettes` * `Imaginative involvement`,
                    data = d1_abs_subscales)
r106_spev_MR5 <- lm(`Spiritual Events` ~ `Porosity Vignettes` * `Sensed presence`,
                    data = d1_abs_subscales)
r106_spev_MR6 <- lm(`Spiritual Events` ~ `Porosity Vignettes` * `Altered states of consciousness (b)`,
                    data = d1_abs_subscales)

# r107_spev <- lm(`Spiritual Events` ~ Country * Site * Religion 
#                + `Porosity Vignettes` + Country:`Porosity Vignettes`,
#                data = d1_abs_subscales)

r108_spev_MR1 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + Synesthesia + Country:Synesthesia,
                    data = d1_abs_subscales)
r108_spev_MR2 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Aesthetic involvement in nature` + Country:`Aesthetic involvement in nature`,
                    data = d1_abs_subscales)
r108_spev_MR3 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Altered states of consciousness (a)` + Country:`Altered states of consciousness (a)`,
                    data = d1_abs_subscales)
r108_spev_MR4 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Imaginative involvement` + Country:`Imaginative involvement`,
                    data = d1_abs_subscales)
r108_spev_MR5 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Sensed presence` + Country:`Sensed presence`,
                    data = d1_abs_subscales)
r108_spev_MR6 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Altered states of consciousness (b)` + Country:`Altered states of consciousness (b)`,
                    data = d1_abs_subscales)

r109_spev_MR1 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Porosity Vignettes` + Country:`Porosity Vignettes`
                    + Synesthesia + Country:Synesthesia
                    + `Porosity Vignettes`:Synesthesia 
                    + Country:`Porosity Vignettes`:Synesthesia,
                    data = d1_abs_subscales)
r109_spev_MR2 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Porosity Vignettes` + Country:`Porosity Vignettes`
                    + `Aesthetic involvement in nature` + Country:`Aesthetic involvement in nature`
                    + `Porosity Vignettes`:`Aesthetic involvement in nature` 
                    + Country:`Porosity Vignettes`:`Aesthetic involvement in nature`,
                    data = d1_abs_subscales)
r109_spev_MR3 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Porosity Vignettes` + Country:`Porosity Vignettes`
                    + `Altered states of consciousness (a)` + Country:`Altered states of consciousness (a)`
                    + `Porosity Vignettes`:`Altered states of consciousness (a)` 
                    + Country:`Porosity Vignettes`:`Altered states of consciousness (a)`,
                    data = d1_abs_subscales)
r109_spev_MR4 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Porosity Vignettes` + Country:`Porosity Vignettes`
                    + `Imaginative involvement` + Country:`Imaginative involvement`
                    + `Porosity Vignettes`:`Imaginative involvement` 
                    + Country:`Porosity Vignettes`:`Imaginative involvement`,
                    data = d1_abs_subscales)
r109_spev_MR5 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Porosity Vignettes` + Country:`Porosity Vignettes`
                    + `Sensed presence` + Country:`Sensed presence`
                    + `Porosity Vignettes`:`Sensed presence` 
                    + Country:`Porosity Vignettes`:`Sensed presence`,
                    data = d1_abs_subscales)
r109_spev_MR6 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                    + `Porosity Vignettes` + Country:`Porosity Vignettes`
                    + `Altered states of consciousness (b)` + Country:`Altered states of consciousness (b)`
                    + `Porosity Vignettes`:`Altered states of consciousness (b)` 
                    + Country:`Porosity Vignettes`:`Altered states of consciousness (b)`,
                    data = d1_abs_subscales)

r110_spev_MR1 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                   + `Porosity Vignettes` + Country:`Porosity Vignettes`
                   + Synesthesia + Country:Synesthesia
                   + `Porosity Vignettes`:Synesthesia
                   + Country:`Porosity Vignettes`:Synesthesia
                   + Gender + Age + Education,
                   data = d1_abs_subscales)
r110_spev_MR2 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                   + `Porosity Vignettes` + Country:`Porosity Vignettes`
                   + `Aesthetic involvement in nature` + Country:`Aesthetic involvement in nature`
                   + `Porosity Vignettes`:`Aesthetic involvement in nature`
                   + Country:`Porosity Vignettes`:`Aesthetic involvement in nature`
                   + Gender + Age + Education,
                   data = d1_abs_subscales)
r110_spev_MR3 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                   + `Porosity Vignettes` + Country:`Porosity Vignettes`
                   + `Altered states of consciousness (a)` + Country:`Altered states of consciousness (a)`
                   + `Porosity Vignettes`:`Altered states of consciousness (a)`
                   + Country:`Porosity Vignettes`:`Altered states of consciousness (a)`
                   + Gender + Age + Education,
                   data = d1_abs_subscales)
r110_spev_MR4 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                   + `Porosity Vignettes` + Country:`Porosity Vignettes`
                   + `Imaginative involvement` + Country:`Imaginative involvement`
                   + `Porosity Vignettes`:`Imaginative involvement`
                   + Country:`Porosity Vignettes`:`Imaginative involvement`
                   + Gender + Age + Education,
                   data = d1_abs_subscales)
r110_spev_MR5 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                   + `Porosity Vignettes` + Country:`Porosity Vignettes`
                   + `Sensed presence` + Country:`Sensed presence`
                   + `Porosity Vignettes`:`Sensed presence`
                   + Country:`Porosity Vignettes`:`Sensed presence`
                   + Gender + Age + Education,
                   data = d1_abs_subscales)
r110_spev_MR6 <- lm(`Spiritual Events` ~ Country * Site * Religion 
                   + `Porosity Vignettes` + Country:`Porosity Vignettes`
                   + `Altered states of consciousness (b)` + Country:`Altered states of consciousness (b)`
                   + `Porosity Vignettes`:`Altered states of consciousness (b)`
                   + Country:`Porosity Vignettes`:`Altered states of consciousness (b)`
                   + Gender + Age + Education,
                   data = d1_abs_subscales)
table_s20_subscales <- stargazer(
  #r104_spev, 
  r105_spev_MR1, r105_spev_MR2, r105_spev_MR3, r105_spev_MR4, r105_spev_MR5, r105_spev_MR6,
  r106_spev_MR1, r106_spev_MR2, r106_spev_MR3, r106_spev_MR4, r106_spev_MR5, r106_spev_MR6,
  #r107_spev, 
  r108_spev_MR1, r108_spev_MR2, r108_spev_MR3, r108_spev_MR4, r108_spev_MR5, r108_spev_MR6,
  r109_spev_MR1, r109_spev_MR2, r109_spev_MR3, r109_spev_MR4, r109_spev_MR5, r109_spev_MR6,
  r110_spev_MR1, r110_spev_MR2, r110_spev_MR3, r110_spev_MR4, r110_spev_MR5, r110_spev_MR6,
  type = "html",
  ci = T,
  report = c("vcsp"),
  digits = 2,
  digits.extra = 1000,
  omit.table.layout = "n",
  # order = c("^`Porosity Vignettes`$",
  #           "^Absorption$",
  #           "^`Porosity Vignettes`:Absorption$"),
  # dep.var.labels.include = F,
  dep.var.caption = "",
  single.row = T)
cat(sub_interact_fun(table_s20_subscales), 
    file = "./stargazer_tables/table_s20_subscales.html")
# htmltools::includeHTML("./stargazer_tables/table_s20_subscales.html")
table_s20_subscales_MR1 <- stargazer(#r104_spev,
                                     r105_spev_MR1, r106_spev_MR1, 
                                     #r107_spev, 
                                     r108_spev_MR1, r109_spev_MR1, r110_spev_MR1, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^`Porosity Vignettes`$",
                                               "^Synesthesia$",
                                               "^`Porosity Vignettes`:Synesthesia$"),
                                     dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s20_subscales_MR1), 
    file = "./stargazer_tables/table_s20_subscales_MR1.html")
htmltools::includeHTML("./stargazer_tables/table_s20_subscales_MR1.html")
(1)(2)(3)(4)(5)
Porosity Vignettes0.33 (0.23, 0.44)0.34 (0.19, 0.48)0.31 (0.17, 0.46)
p = 0.00p = 0.00001p = 0.00005
Synesthesia0.14 (0.03, 0.25)0.09 (-0.01, 0.20)0.18 (0.08, 0.28)0.15 (0.04, 0.27)0.16 (0.04, 0.27)
p = 0.02p = 0.09p = 0.0005p = 0.01p = 0.01
Porosity Vignettes:Synesthesia-0.02 (-0.13, 0.09)-0.02 (-0.16, 0.13)-0.02 (-0.17, 0.12)
p = 0.75p = 0.84p = 0.74
Country: Gh.0.14 (-0.02, 0.31)0.02 (-0.20, 0.25)0.01 (-0.22, 0.24)
p = 0.10p = 0.85p = 0.93
Country: Th.-0.03 (-0.24, 0.18)-0.09 (-0.32, 0.14)-0.09 (-0.33, 0.14)
p = 0.78p = 0.45p = 0.45
Country: Ch.-0.41 (-0.61, -0.21)-0.24 (-0.53, 0.06)-0.24 (-0.53, 0.05)
p = 0.0001p = 0.12p = 0.11
Country: Va.0.79 (0.58, 1.01)0.70 (0.47, 0.93)0.67 (0.42, 0.92)
p = 0.00p = 0.00p = 0.0000004
Site: rural0.03 (-0.07, 0.12)0.02 (-0.07, 0.12)0.02 (-0.09, 0.13)
p = 0.62p = 0.64p = 0.74
Religion: CC0.26 (0.16, 0.36)0.25 (0.15, 0.35)0.25 (0.15, 0.35)
p = 0.0000005p = 0.000003p = 0.000003
Gender: male-0.07 (-0.17, 0.03)
p = 0.16
Age-0.08 (-0.19, 0.02)
p = 0.13
Education: at least HS-0.12 (-0.30, 0.06)
p = 0.20
Country: Gh. × Site: rural-0.27 (-0.44, -0.10)-0.28 (-0.45, -0.11)-0.24 (-0.42, -0.06)
p = 0.002p = 0.002p = 0.01
Country: Th. × Site: rural0.02 (-0.20, 0.23)0.002 (-0.21, 0.22)0.01 (-0.20, 0.23)
p = 0.90p = 0.99p = 0.91
Country: Ch. × Site: rural0.43 (0.23, 0.63)0.42 (0.23, 0.62)0.38 (0.17, 0.60)
p = 0.00003p = 0.00004p = 0.001
Country: Va. × Site: rural-0.02 (-0.24, 0.21)0.01 (-0.21, 0.23)0.001 (-0.22, 0.22)
p = 0.89p = 0.91p = 1.00
Country: Gh. × Religion: CC-0.17 (-0.35, 0.01)-0.11 (-0.30, 0.07)-0.09 (-0.31, 0.13)
p = 0.07p = 0.22p = 0.42
Country: Th. × Religion: CC-0.09 (-0.31, 0.13)-0.14 (-0.37, 0.08)-0.15 (-0.38, 0.08)
p = 0.42p = 0.22p = 0.21
Country: Ch. × Religion: CC-0.13 (-0.34, 0.07)-0.13 (-0.33, 0.08)-0.15 (-0.36, 0.05)
p = 0.21p = 0.23p = 0.14
Country: Va. × Religion: CC0.10 (-0.12, 0.32)0.10 (-0.12, 0.33)0.11 (-0.12, 0.33)
p = 0.37p = 0.37p = 0.35
Site: rural × Religion: CC-0.11 (-0.21, -0.01)-0.09 (-0.19, 0.01)-0.12 (-0.22, -0.02)
p = 0.04p = 0.07p = 0.03
Country: Gh. × Porosity Vignettes-0.17 (-0.38, 0.03)-0.16 (-0.37, 0.05)
p = 0.11p = 0.14
Country: Th. × Porosity Vignettes-0.10 (-0.36, 0.16)-0.10 (-0.36, 0.16)
p = 0.44p = 0.47
Country: Ch. × Porosity Vignettes-0.08 (-0.36, 0.20)-0.05 (-0.33, 0.23)
p = 0.58p = 0.74
Country: Va. × Porosity Vignettes0.50 (0.07, 0.93)0.45 (0.02, 0.88)
p = 0.03p = 0.05
Country: Gh. × Synesthesia0.003 (-0.18, 0.19)0.10 (-0.13, 0.33)0.12 (-0.11, 0.35)
p = 0.98p = 0.40p = 0.30
Country: Th. × Synesthesia0.09 (-0.11, 0.28)0.08 (-0.12, 0.29)0.09 (-0.12, 0.30)
p = 0.38p = 0.43p = 0.40
Country: Ch. × Synesthesia-0.01 (-0.21, 0.19)-0.03 (-0.27, 0.22)-0.03 (-0.27, 0.22)
p = 0.96p = 0.83p = 0.84
Country: Va. × Synesthesia-0.09 (-0.31, 0.13)-0.13 (-0.36, 0.09)-0.17 (-0.39, 0.06)
p = 0.44p = 0.25p = 0.16
Country: Gh. × Site: rural × Religion: CC-0.11 (-0.28, 0.07)-0.14 (-0.31, 0.03)-0.16 (-0.33, 0.02)
p = 0.25p = 0.12p = 0.09
Country: Th. × Site: rural × Religion: CC0.30 (0.08, 0.52)0.25 (0.04, 0.47)0.25 (0.04, 0.47)
p = 0.01p = 0.03p = 0.03
Country: Ch. × Site: rural × Religion: CC-0.11 (-0.32, 0.09)-0.11 (-0.31, 0.09)-0.11 (-0.30, 0.09)
p = 0.27p = 0.28p = 0.30
Country: Va. × Site: rural × Religion: CC-0.05 (-0.28, 0.17)0.01 (-0.21, 0.24)0.02 (-0.21, 0.24)
p = 0.64p = 0.90p = 0.90
Country: Gh. × Porosity Vignettes:Synesthesia-0.08 (-0.29, 0.13)-0.09 (-0.30, 0.12)
p = 0.46p = 0.40
Country: Th. × Porosity Vignettes:Synesthesia-0.09 (-0.37, 0.18)-0.11 (-0.39, 0.16)
p = 0.51p = 0.42
Country: Ch. × Porosity Vignettes:Synesthesia0.08 (-0.17, 0.32)0.09 (-0.16, 0.33)
p = 0.54p = 0.50
Country: Va. × Porosity Vignettes:Synesthesia0.12 (-0.31, 0.55)0.13 (-0.30, 0.56)
p = 0.59p = 0.57
Constant-0.01 (-0.12, 0.10)-0.01 (-0.12, 0.09)0.02 (-0.08, 0.12)0.02 (-0.10, 0.14)0.07 (-0.07, 0.21)
p = 0.83p = 0.82p = 0.69p = 0.72p = 0.32
Observations301297301297293
R20.020.130.420.470.49
Adjusted R20.020.120.360.400.42
Residual Std. Error0.98 (df = 299)0.93 (df = 293)0.79 (df = 276)0.77 (df = 262)0.76 (df = 255)
F Statistic6.28** (df = 1; 299)14.75*** (df = 3; 293)8.17*** (df = 24; 276)6.80*** (df = 34; 262)6.60*** (df = 37; 255)
table_s20_subscales_MR2 <- stargazer(#r104_spev,
                                     r105_spev_MR2, r106_spev_MR2, 
                                     #r107_spev, 
                                     r108_spev_MR2, r109_spev_MR2, r110_spev_MR2, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^`Porosity Vignettes`$",
                                               "^`Aesthetic involvement in nature`$",
                                               "^`Porosity Vignettes`:`Aesthetic involvement in nature`$"),
                                     dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s20_subscales_MR2), 
    file = "./stargazer_tables/table_s20_subscales_MR2.html")
htmltools::includeHTML("./stargazer_tables/table_s20_subscales_MR2.html")
(1)(2)(3)(4)(5)
Porosity Vignettes0.35 (0.24, 0.46)0.36 (0.22, 0.50)0.34 (0.19, 0.48)
p = 0.00p = 0.000002p = 0.00001
Aesthetic involvement in nature0.08 (-0.04, 0.19)0.04 (-0.07, 0.15)0.12 (0.02, 0.21)0.09 (-0.03, 0.20)0.09 (-0.03, 0.20)
p = 0.19p = 0.48p = 0.02p = 0.14p = 0.14
Porosity Vignettes:Aesthetic involvement in nature-0.10 (-0.21, 0.01)-0.20 (-0.36, -0.05)-0.23 (-0.39, -0.07)
p = 0.07p = 0.02p = 0.005
Country: Gh.0.14 (-0.04, 0.31)0.07 (-0.16, 0.29)0.05 (-0.19, 0.28)
p = 0.13p = 0.57p = 0.70
Country: Th.-0.03 (-0.25, 0.18)-0.12 (-0.35, 0.10)-0.12 (-0.35, 0.12)
p = 0.76p = 0.30p = 0.33
Country: Ch.-0.40 (-0.60, -0.20)-0.18 (-0.43, 0.08)-0.17 (-0.43, 0.08)
p = 0.0002p = 0.18p = 0.19
Country: Va.0.80 (0.58, 1.01)0.67 (0.45, 0.89)0.61 (0.36, 0.86)
p = 0.00p = 0.00p = 0.000003
Site: rural0.03 (-0.07, 0.13)0.03 (-0.07, 0.12)0.01 (-0.10, 0.13)
p = 0.52p = 0.57p = 0.83
Religion: CC0.24 (0.14, 0.34)0.23 (0.13, 0.33)0.23 (0.14, 0.33)
p = 0.000003p = 0.00001p = 0.000005
Gender: male-0.05 (-0.14, 0.04)
p = 0.30
Age-0.09 (-0.19, 0.02)
p = 0.12
Education: at least HS-0.14 (-0.33, 0.04)
p = 0.12
Country: Gh. × Site: rural-0.27 (-0.44, -0.10)-0.29 (-0.45, -0.12)-0.23 (-0.41, -0.06)
p = 0.003p = 0.002p = 0.01
Country: Th. × Site: rural0.02 (-0.21, 0.24)0.02 (-0.20, 0.24)0.04 (-0.18, 0.25)
p = 0.90p = 0.86p = 0.75
Country: Ch. × Site: rural0.44 (0.24, 0.64)0.43 (0.23, 0.63)0.38 (0.16, 0.59)
p = 0.00003p = 0.00003p = 0.001
Country: Va. × Site: rural-0.0001 (-0.22, 0.22)0.01 (-0.20, 0.22)-0.02 (-0.23, 0.19)
p = 1.00p = 0.95p = 0.86
Country: Gh. × Religion: CC-0.18 (-0.36, -0.01)-0.12 (-0.29, 0.05)-0.09 (-0.29, 0.12)
p = 0.04p = 0.17p = 0.40
Country: Th. × Religion: CC-0.08 (-0.30, 0.14)-0.12 (-0.34, 0.10)-0.13 (-0.36, 0.10)
p = 0.50p = 0.28p = 0.27
Country: Ch. × Religion: CC-0.16 (-0.36, 0.04)-0.12 (-0.31, 0.07)-0.15 (-0.35, 0.04)
p = 0.12p = 0.22p = 0.13
Country: Va. × Religion: CC0.11 (-0.10, 0.33)0.08 (-0.13, 0.29)0.09 (-0.12, 0.30)
p = 0.31p = 0.45p = 0.41
Site: rural × Religion: CC-0.12 (-0.21, -0.02)-0.10 (-0.19, 0.001)-0.12 (-0.22, -0.02)
p = 0.03p = 0.06p = 0.02
Country: Gh. × Porosity Vignettes-0.24 (-0.45, -0.03)-0.23 (-0.44, -0.02)
p = 0.03p = 0.04
Country: Th. × Porosity Vignettes-0.08 (-0.34, 0.18)-0.08 (-0.34, 0.18)
p = 0.54p = 0.56
Country: Ch. × Porosity Vignettes-0.06 (-0.32, 0.19)-0.03 (-0.29, 0.23)
p = 0.64p = 0.83
Country: Va. × Porosity Vignettes0.56 (0.14, 0.98)0.50 (0.08, 0.92)
p = 0.01p = 0.03
Country: Gh. × Aesthetic involvement in nature0.04 (-0.13, 0.22)0.17 (-0.05, 0.38)0.18 (-0.04, 0.39)
p = 0.63p = 0.13p = 0.11
Country: Th. × Aesthetic involvement in nature0.12 (-0.08, 0.32)0.13 (-0.08, 0.34)0.13 (-0.08, 0.34)
p = 0.26p = 0.23p = 0.24
Country: Ch. × Aesthetic involvement in nature0.04 (-0.15, 0.23)-0.11 (-0.41, 0.18)-0.15 (-0.45, 0.14)
p = 0.70p = 0.47p = 0.32
Country: Va. × Aesthetic involvement in nature-0.10 (-0.30, 0.11)-0.01 (-0.22, 0.21)0.02 (-0.19, 0.24)
p = 0.37p = 0.95p = 0.84
Country: Gh. × Site: rural × Religion: CC-0.07 (-0.24, 0.10)-0.11 (-0.28, 0.05)-0.13 (-0.30, 0.05)
p = 0.42p = 0.19p = 0.16
Country: Th. × Site: rural × Religion: CC0.26 (0.05, 0.48)0.20 (-0.01, 0.41)0.19 (-0.03, 0.40)
p = 0.02p = 0.07p = 0.10
Country: Ch. × Site: rural × Religion: CC-0.13 (-0.33, 0.07)-0.11 (-0.31, 0.08)-0.11 (-0.30, 0.08)
p = 0.22p = 0.25p = 0.26
Country: Va. × Site: rural × Religion: CC-0.08 (-0.30, 0.14)0.01 (-0.21, 0.22)0.02 (-0.20, 0.23)
p = 0.46p = 0.95p = 0.87
Country: Gh. × Porosity Vignettes:Aesthetic involvement in nature0.10 (-0.11, 0.31)0.10 (-0.11, 0.30)
p = 0.36p = 0.36
Country: Th. × Porosity Vignettes:Aesthetic involvement in nature0.06 (-0.21, 0.34)0.08 (-0.20, 0.36)
p = 0.65p = 0.57
Country: Ch. × Porosity Vignettes:Aesthetic involvement in nature0.05 (-0.24, 0.34)0.04 (-0.25, 0.33)
p = 0.74p = 0.77
Country: Va. × Porosity Vignettes:Aesthetic involvement in nature-0.23 (-0.71, 0.24)-0.28 (-0.76, 0.19)
p = 0.35p = 0.25
Constant-0.01 (-0.12, 0.10)-0.01 (-0.11, 0.10)0.02 (-0.08, 0.12)0.04 (-0.07, 0.16)0.10 (-0.03, 0.24)
p = 0.83p = 0.92p = 0.66p = 0.48p = 0.15
Observations301297301297293
R20.010.130.400.480.50
Adjusted R20.0020.130.350.410.42
Residual Std. Error0.98 (df = 299)0.93 (df = 293)0.79 (df = 276)0.76 (df = 262)0.75 (df = 255)
F Statistic1.73 (df = 1; 299)15.22*** (df = 3; 293)7.76*** (df = 24; 276)7.01*** (df = 34; 262)6.77*** (df = 37; 255)
table_s20_subscales_MR3 <- stargazer(#r104_spev,
                                     r105_spev_MR3, r106_spev_MR3, 
                                     #r107_spev, 
                                     r108_spev_MR3, r109_spev_MR3, r110_spev_MR3, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^`Porosity Vignettes`$",
                                               "^`Altered states of consciousness \\(a\\)`$",
                                               "^`Porosity Vignettes`:`Altered states of consciousness \\(a\\)`$"),
                                     dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s20_subscales_MR3), 
    file = "./stargazer_tables/table_s20_subscales_MR3.html")
htmltools::includeHTML("./stargazer_tables/table_s20_subscales_MR3.html")
(1)(2)(3)(4)(5)
Porosity Vignettes0.33 (0.23, 0.44)0.36 (0.22, 0.50)0.33 (0.19, 0.47)
p = 0.00p = 0.000002p = 0.00002
Altered states of consciousness (a)0.14 (0.03, 0.26)0.10 (-0.003, 0.21)0.14 (0.04, 0.23)0.11 (-0.01, 0.22)0.13 (0.01, 0.24)
p = 0.02p = 0.06p = 0.01p = 0.08p = 0.04
Porosity Vignettes:Altered states of consciousness (a)-0.04 (-0.15, 0.07)0.03 (-0.12, 0.17)0.01 (-0.14, 0.15)
p = 0.49p = 0.72p = 0.94
Country: Gh.0.14 (-0.03, 0.31)0.09 (-0.14, 0.32)0.10 (-0.14, 0.33)
p = 0.11p = 0.45p = 0.43
Country: Th.-0.04 (-0.25, 0.18)-0.15 (-0.37, 0.07)-0.14 (-0.37, 0.09)
p = 0.73p = 0.20p = 0.23
Country: Ch.-0.40 (-0.60, -0.21)-0.20 (-0.46, 0.06)-0.22 (-0.47, 0.04)
p = 0.0001p = 0.14p = 0.11
Country: Va.0.80 (0.59, 1.01)0.69 (0.47, 0.91)0.62 (0.37, 0.86)
p = 0.00p = 0.00p = 0.000002
Site: rural0.06 (-0.04, 0.15)0.05 (-0.05, 0.15)0.03 (-0.09, 0.14)
p = 0.28p = 0.31p = 0.67
Religion: CC0.23 (0.13, 0.32)0.22 (0.12, 0.32)0.23 (0.13, 0.32)
p = 0.00001p = 0.00002p = 0.00002
Gender: male-0.06 (-0.16, 0.03)
p = 0.19
Age-0.07 (-0.18, 0.03)
p = 0.18
Education: at least HS-0.17 (-0.35, 0.01)
p = 0.07
Country: Gh. × Site: rural-0.21 (-0.39, -0.03)-0.24 (-0.42, -0.07)-0.19 (-0.38, -0.01)
p = 0.03p = 0.01p = 0.05
Country: Th. × Site: rural-0.02 (-0.23, 0.20)-0.01 (-0.23, 0.21)0.01 (-0.21, 0.22)
p = 0.89p = 0.91p = 0.97
Country: Ch. × Site: rural0.44 (0.24, 0.65)0.45 (0.25, 0.64)0.38 (0.17, 0.59)
p = 0.00003p = 0.00002p = 0.0005
Country: Va. × Site: rural-0.005 (-0.22, 0.21)0.02 (-0.19, 0.23)-0.01 (-0.22, 0.20)
p = 0.97p = 0.88p = 0.92
Country: Gh. × Religion: CC-0.22 (-0.39, -0.05)-0.18 (-0.35, -0.01)-0.12 (-0.32, 0.08)
p = 0.02p = 0.05p = 0.24
Country: Th. × Religion: CC-0.06 (-0.28, 0.15)-0.10 (-0.32, 0.13)-0.13 (-0.36, 0.10)
p = 0.56p = 0.40p = 0.28
Country: Ch. × Religion: CC-0.13 (-0.32, 0.07)-0.10 (-0.29, 0.09)-0.13 (-0.32, 0.06)
p = 0.21p = 0.32p = 0.19
Country: Va. × Religion: CC0.11 (-0.11, 0.33)0.10 (-0.11, 0.31)0.10 (-0.11, 0.32)
p = 0.33p = 0.36p = 0.34
Site: rural × Religion: CC-0.12 (-0.22, -0.02)-0.10 (-0.19, -0.001)-0.12 (-0.22, -0.03)
p = 0.02p = 0.05p = 0.02
Country: Gh. × Porosity Vignettes-0.29 (-0.50, -0.08)-0.29 (-0.50, -0.08)
p = 0.01p = 0.01
Country: Th. × Porosity Vignettes-0.07 (-0.32, 0.18)-0.06 (-0.31, 0.20)
p = 0.58p = 0.67
Country: Ch. × Porosity Vignettes-0.05 (-0.31, 0.21)0.001 (-0.26, 0.26)
p = 0.72p = 1.00
Country: Va. × Porosity Vignettes0.58 (0.15, 1.00)0.49 (0.06, 0.92)
p = 0.01p = 0.03
Country: Gh. × Altered states of consciousness (a)0.13 (-0.05, 0.31)0.18 (-0.02, 0.39)0.21 (0.01, 0.42)
p = 0.15p = 0.09p = 0.05
Country: Th. × Altered states of consciousness (a)0.08 (-0.11, 0.28)0.12 (-0.10, 0.33)0.10 (-0.11, 0.32)
p = 0.40p = 0.29p = 0.36
Country: Ch. × Altered states of consciousness (a)0.08 (-0.11, 0.28)-0.01 (-0.30, 0.28)-0.02 (-0.31, 0.27)
p = 0.39p = 0.95p = 0.91
Country: Va. × Altered states of consciousness (a)-0.26 (-0.47, -0.06)-0.22 (-0.43, -0.01)-0.23 (-0.44, -0.02)
p = 0.02p = 0.05p = 0.04
Country: Gh. × Site: rural × Religion: CC-0.07 (-0.24, 0.09)-0.12 (-0.28, 0.05)-0.13 (-0.30, 0.04)
p = 0.40p = 0.16p = 0.13
Country: Th. × Site: rural × Religion: CC0.29 (0.07, 0.50)0.23 (0.03, 0.44)0.22 (0.01, 0.43)
p = 0.01p = 0.03p = 0.05
Country: Ch. × Site: rural × Religion: CC-0.14 (-0.33, 0.06)-0.13 (-0.33, 0.06)-0.13 (-0.32, 0.06)
p = 0.17p = 0.17p = 0.19
Country: Va. × Site: rural × Religion: CC-0.09 (-0.31, 0.12)0.003 (-0.21, 0.22)0.01 (-0.20, 0.23)
p = 0.42p = 0.98p = 0.91
Country: Gh. × Porosity Vignettes:Altered states of consciousness (a)-0.13 (-0.33, 0.07)-0.17 (-0.37, 0.03)
p = 0.22p = 0.10
Country: Th. × Porosity Vignettes:Altered states of consciousness (a)-0.003 (-0.31, 0.30)-0.01 (-0.32, 0.29)
p = 0.99p = 0.94
Country: Ch. × Porosity Vignettes:Altered states of consciousness (a)-0.14 (-0.42, 0.15)-0.10 (-0.38, 0.18)
p = 0.36p = 0.48
Country: Va. × Porosity Vignettes:Altered states of consciousness (a)0.37 (-0.02, 0.76)0.36 (-0.03, 0.74)
p = 0.07p = 0.08
Constant-0.01 (-0.12, 0.10)-0.01 (-0.12, 0.10)0.02 (-0.07, 0.12)0.06 (-0.05, 0.17)0.13 (-0.003, 0.27)
p = 0.84p = 0.86p = 0.65p = 0.31p = 0.06
Observations301297301297293
R20.020.140.420.480.50
Adjusted R20.020.130.370.420.43
Residual Std. Error0.98 (df = 299)0.93 (df = 293)0.78 (df = 276)0.76 (df = 262)0.75 (df = 255)
F Statistic6.43** (df = 1; 299)15.32*** (df = 3; 293)8.35*** (df = 24; 276)7.19*** (df = 34; 262)7.00*** (df = 37; 255)
table_s20_subscales_MR4 <- stargazer(#r104_spev,
                                     r105_spev_MR4, r106_spev_MR4, 
                                     #r107_spev, 
                                     r108_spev_MR4, r109_spev_MR4, r110_spev_MR4, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^`Porosity Vignettes`$",
                                               "^`Imaginative involvement`$",
                                               "^`Porosity Vignettes`:`Imaginative involvement`$"),
                                     dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s20_subscales_MR4), 
    file = "./stargazer_tables/table_s20_subscales_MR4.html")
htmltools::includeHTML("./stargazer_tables/table_s20_subscales_MR4.html")
(1)(2)(3)(4)(5)
Porosity Vignettes0.34 (0.23, 0.44)0.32 (0.17, 0.47)0.30 (0.15, 0.45)
p = 0.00p = 0.0001p = 0.0002
Imaginative involvement0.09 (-0.02, 0.20)0.05 (-0.06, 0.16)0.15 (0.06, 0.25)0.15 (0.03, 0.28)0.14 (0.02, 0.27)
p = 0.12p = 0.35p = 0.002p = 0.02p = 0.03
Porosity Vignettes:Imaginative involvement0.02 (-0.09, 0.13)0.02 (-0.12, 0.15)-0.003 (-0.14, 0.14)
p = 0.75p = 0.83p = 0.98
Country: Gh.0.14 (-0.03, 0.31)0.08 (-0.15, 0.31)0.06 (-0.18, 0.30)
p = 0.10p = 0.52p = 0.65
Country: Th.-0.06 (-0.27, 0.15)-0.14 (-0.37, 0.09)-0.15 (-0.39, 0.09)
p = 0.59p = 0.23p = 0.22
Country: Ch.-0.40 (-0.59, -0.20)-0.27 (-0.58, 0.05)-0.25 (-0.56, 0.06)
p = 0.0001p = 0.10p = 0.12
Country: Va.0.81 (0.59, 1.02)0.72 (0.49, 0.95)0.70 (0.44, 0.95)
p = 0.00p = 0.00p = 0.0000002
Site: rural0.03 (-0.07, 0.13)0.03 (-0.07, 0.12)0.02 (-0.09, 0.14)
p = 0.52p = 0.60p = 0.69
Religion: CC0.23 (0.14, 0.33)0.22 (0.12, 0.32)0.22 (0.13, 0.32)
p = 0.000005p = 0.00002p = 0.00002
Gender: male-0.07 (-0.17, 0.02)
p = 0.13
Age-0.08 (-0.19, 0.03)
p = 0.18
Education: at least HS-0.10 (-0.28, 0.08)
p = 0.27
Country: Gh. × Site: rural-0.24 (-0.42, -0.07)-0.25 (-0.42, -0.08)-0.23 (-0.41, -0.05)
p = 0.01p = 0.005p = 0.02
Country: Th. × Site: rural-0.05 (-0.26, 0.16)-0.05 (-0.26, 0.16)-0.03 (-0.25, 0.18)
p = 0.65p = 0.66p = 0.77
Country: Ch. × Site: rural0.45 (0.25, 0.65)0.45 (0.25, 0.64)0.41 (0.20, 0.63)
p = 0.00002p = 0.00002p = 0.0003
Country: Va. × Site: rural0.03 (-0.19, 0.24)0.02 (-0.20, 0.24)0.02 (-0.20, 0.24)
p = 0.81p = 0.83p = 0.87
Country: Gh. × Religion: CC-0.23 (-0.40, -0.06)-0.18 (-0.35, -0.004)-0.16 (-0.37, 0.05)
p = 0.01p = 0.05p = 0.14
Country: Th. × Religion: CC-0.12 (-0.33, 0.09)-0.15 (-0.37, 0.06)-0.15 (-0.38, 0.08)
p = 0.28p = 0.17p = 0.21
Country: Ch. × Religion: CC-0.13 (-0.33, 0.06)-0.12 (-0.32, 0.08)-0.15 (-0.35, 0.05)
p = 0.19p = 0.24p = 0.15
Country: Va. × Religion: CC0.17 (-0.05, 0.38)0.14 (-0.07, 0.36)0.15 (-0.07, 0.37)
p = 0.14p = 0.20p = 0.19
Site: rural × Religion: CC-0.12 (-0.22, -0.02)-0.10 (-0.20, -0.01)-0.12 (-0.22, -0.02)
p = 0.02p = 0.05p = 0.02
Country: Gh. × Porosity Vignettes-0.22 (-0.44, 0.0003)-0.18 (-0.41, 0.04)
p = 0.06p = 0.11
Country: Th. × Porosity Vignettes-0.03 (-0.29, 0.23)-0.03 (-0.30, 0.23)
p = 0.81p = 0.80
Country: Ch. × Porosity Vignettes-0.10 (-0.40, 0.21)-0.06 (-0.37, 0.25)
p = 0.54p = 0.73
Country: Va. × Porosity Vignettes0.45 (0.01, 0.89)0.39 (-0.06, 0.83)
p = 0.05p = 0.10
Country: Gh. × Imaginative involvement0.07 (-0.12, 0.25)0.09 (-0.14, 0.32)0.08 (-0.16, 0.31)
p = 0.49p = 0.46p = 0.53
Country: Th. × Imaginative involvement-0.10 (-0.29, 0.09)-0.09 (-0.31, 0.13)-0.08 (-0.30, 0.14)
p = 0.30p = 0.43p = 0.47
Country: Ch. × Imaginative involvement0.04 (-0.16, 0.23)0.07 (-0.28, 0.41)0.04 (-0.31, 0.38)
p = 0.73p = 0.72p = 0.83
Country: Va. × Imaginative involvement0.10 (-0.11, 0.30)0.03 (-0.20, 0.26)0.05 (-0.18, 0.28)
p = 0.36p = 0.78p = 0.65
Country: Gh. × Site: rural × Religion: CC-0.13 (-0.31, 0.05)-0.18 (-0.36, 0.003)-0.17 (-0.35, 0.01)
p = 0.18p = 0.06p = 0.07
Country: Th. × Site: rural × Religion: CC0.29 (0.07, 0.50)0.24 (0.03, 0.46)0.24 (0.02, 0.46)
p = 0.01p = 0.03p = 0.04
Country: Ch. × Site: rural × Religion: CC-0.12 (-0.32, 0.08)-0.11 (-0.30, 0.09)-0.11 (-0.31, 0.08)
p = 0.23p = 0.29p = 0.27
Country: Va. × Site: rural × Religion: CC-0.05 (-0.27, 0.16)0.02 (-0.20, 0.24)0.02 (-0.20, 0.24)
p = 0.63p = 0.84p = 0.84
Country: Gh. × Porosity Vignettes:Imaginative involvement-0.04 (-0.25, 0.18)-0.08 (-0.29, 0.14)
p = 0.75p = 0.49
Country: Th. × Porosity Vignettes:Imaginative involvement0.01 (-0.23, 0.25)-0.02 (-0.27, 0.22)
p = 0.96p = 0.85
Country: Ch. × Porosity Vignettes:Imaginative involvement0.09 (-0.23, 0.40)0.08 (-0.23, 0.40)
p = 0.60p = 0.62
Country: Va. × Porosity Vignettes:Imaginative involvement-0.04 (-0.41, 0.32)-0.001 (-0.36, 0.36)
p = 0.82p = 1.00
Constant-0.01 (-0.12, 0.10)-0.02 (-0.12, 0.09)0.02 (-0.08, 0.11)0.02 (-0.10, 0.15)0.07 (-0.07, 0.21)
p = 0.82p = 0.76p = 0.75p = 0.70p = 0.36
Observations301297301297293
R20.010.130.410.460.48
Adjusted R20.0050.120.360.390.40
Residual Std. Error0.98 (df = 299)0.93 (df = 293)0.79 (df = 276)0.77 (df = 262)0.77 (df = 255)
F Statistic2.49 (df = 1; 299)13.98*** (df = 3; 293)8.00*** (df = 24; 276)6.64*** (df = 34; 262)6.30*** (df = 37; 255)
table_s20_subscales_MR5 <- stargazer(#r104_spev,
                                     r105_spev_MR5, r106_spev_MR5, 
                                     #r107_spev, 
                                     r108_spev_MR5, r109_spev_MR5, r110_spev_MR5, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^`Porosity Vignettes`$",
                                               "^`Sensed presence`$",
                                               "^`Porosity Vignettes`:`Sensed presence`$"),
                                     dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s20_subscales_MR5), 
    file = "./stargazer_tables/table_s20_subscales_MR5.html")
htmltools::includeHTML("./stargazer_tables/table_s20_subscales_MR5.html")
(1)(2)(3)(4)(5)
Porosity Vignettes0.32 (0.21, 0.42)0.33 (0.19, 0.47)0.31 (0.17, 0.45)
p = 0.00p = 0.00001p = 0.00002
Sensed presence0.26 (0.15, 0.37)0.22 (0.11, 0.32)0.27 (0.17, 0.36)0.23 (0.13, 0.34)0.23 (0.12, 0.34)
p = 0.00001p = 0.0001p = 0.00000005p = 0.00003p = 0.00005
Porosity Vignettes:Sensed presence-0.0003 (-0.11, 0.11)-0.11 (-0.25, 0.03)-0.14 (-0.28, 0.002)
p = 1.00p = 0.12p = 0.06
Country: Gh.0.16 (-0.01, 0.32)0.04 (-0.18, 0.26)0.02 (-0.20, 0.25)
p = 0.07p = 0.71p = 0.85
Country: Th.-0.07 (-0.27, 0.14)-0.15 (-0.37, 0.06)-0.14 (-0.36, 0.08)
p = 0.52p = 0.17p = 0.23
Country: Ch.-0.39 (-0.58, -0.20)-0.18 (-0.44, 0.08)-0.18 (-0.44, 0.08)
p = 0.0001p = 0.19p = 0.18
Country: Va.0.79 (0.58, 0.99)0.70 (0.48, 0.92)0.65 (0.41, 0.89)
p = 0.00p = 0.00p = 0.0000002
Site: rural-0.01 (-0.10, 0.09)-0.003 (-0.10, 0.09)-0.01 (-0.12, 0.10)
p = 0.92p = 0.96p = 0.86
Religion: CC0.23 (0.14, 0.33)0.21 (0.12, 0.31)0.21 (0.12, 0.31)
p = 0.000004p = 0.00002p = 0.00002
Gender: male-0.02 (-0.11, 0.07)
p = 0.62
Age-0.10 (-0.20, 0.01)
p = 0.09
Education: at least HS-0.13 (-0.30, 0.04)
p = 0.15
Country: Gh. × Site: rural-0.19 (-0.35, -0.02)-0.21 (-0.38, -0.04)-0.16 (-0.34, 0.02)
p = 0.03p = 0.02p = 0.09
Country: Th. × Site: rural-0.02 (-0.23, 0.18)-0.02 (-0.22, 0.19)-0.01 (-0.22, 0.19)
p = 0.84p = 0.86p = 0.90
Country: Ch. × Site: rural0.41 (0.22, 0.61)0.45 (0.26, 0.64)0.42 (0.21, 0.63)
p = 0.0001p = 0.00001p = 0.0002
Country: Va. × Site: rural-0.07 (-0.28, 0.15)-0.07 (-0.29, 0.14)-0.11 (-0.32, 0.11)
p = 0.55p = 0.50p = 0.33
Country: Gh. × Religion: CC-0.14 (-0.31, 0.02)-0.08 (-0.25, 0.08)-0.06 (-0.26, 0.14)
p = 0.10p = 0.32p = 0.55
Country: Th. × Religion: CC-0.14 (-0.35, 0.06)-0.18 (-0.38, 0.03)-0.18 (-0.40, 0.04)
p = 0.17p = 0.10p = 0.11
Country: Ch. × Religion: CC-0.12 (-0.32, 0.08)-0.11 (-0.31, 0.09)-0.15 (-0.35, 0.05)
p = 0.25p = 0.29p = 0.16
Country: Va. × Religion: CC0.09 (-0.12, 0.30)0.06 (-0.15, 0.27)0.08 (-0.13, 0.29)
p = 0.39p = 0.57p = 0.47
Site: rural × Religion: CC-0.15 (-0.25, -0.06)-0.14 (-0.23, -0.04)-0.16 (-0.25, -0.06)
p = 0.002p = 0.01p = 0.002
Country: Gh. × Porosity Vignettes-0.21 (-0.42, -0.01)-0.21 (-0.41, -0.005)
p = 0.05p = 0.05
Country: Th. × Porosity Vignettes-0.08 (-0.33, 0.17)-0.06 (-0.31, 0.19)
p = 0.55p = 0.66
Country: Ch. × Porosity Vignettes-0.003 (-0.26, 0.25)0.02 (-0.24, 0.28)
p = 0.99p = 0.90
Country: Va. × Porosity Vignettes0.40 (-0.02, 0.81)0.35 (-0.07, 0.76)
p = 0.07p = 0.11
Country: Gh. × Sensed presence0.04 (-0.14, 0.22)0.11 (-0.10, 0.31)0.14 (-0.06, 0.34)
p = 0.64p = 0.32p = 0.18
Country: Th. × Sensed presence0.12 (-0.07, 0.31)0.16 (-0.04, 0.35)0.15 (-0.05, 0.35)
p = 0.21p = 0.13p = 0.15
Country: Ch. × Sensed presence-0.17 (-0.37, 0.03)-0.24 (-0.48, 0.004)-0.26 (-0.50, -0.02)
p = 0.09p = 0.06p = 0.04
Country: Va. × Sensed presence0.12 (-0.08, 0.32)0.09 (-0.12, 0.30)0.08 (-0.13, 0.29)
p = 0.25p = 0.40p = 0.44
Country: Gh. × Site: rural × Religion: CC-0.13 (-0.31, 0.04)-0.18 (-0.35, -0.01)-0.21 (-0.39, -0.04)
p = 0.14p = 0.05p = 0.02
Country: Th. × Site: rural × Religion: CC0.19 (-0.02, 0.41)0.16 (-0.05, 0.36)0.15 (-0.06, 0.36)
p = 0.08p = 0.15p = 0.17
Country: Ch. × Site: rural × Religion: CC-0.10 (-0.29, 0.09)-0.09 (-0.28, 0.10)-0.09 (-0.27, 0.10)
p = 0.30p = 0.36p = 0.37
Country: Va. × Site: rural × Religion: CC-0.02 (-0.22, 0.19)0.05 (-0.15, 0.26)0.08 (-0.13, 0.29)
p = 0.89p = 0.61p = 0.46
Country: Gh. × Porosity Vignettes:Sensed presence0.06 (-0.13, 0.25)0.06 (-0.13, 0.25)
p = 0.55p = 0.53
Country: Th. × Porosity Vignettes:Sensed presence-0.02 (-0.27, 0.22)-0.04 (-0.29, 0.21)
p = 0.87p = 0.75
Country: Ch. × Porosity Vignettes:Sensed presence0.07 (-0.17, 0.31)0.11 (-0.13, 0.35)
p = 0.56p = 0.37
Country: Va. × Porosity Vignettes:Sensed presence-0.16 (-0.57, 0.25)-0.20 (-0.60, 0.21)
p = 0.46p = 0.35
Constant-0.01 (-0.12, 0.09)-0.01 (-0.12, 0.09)0.004 (-0.09, 0.10)0.05 (-0.06, 0.16)0.11 (-0.02, 0.24)
p = 0.80p = 0.79p = 0.93p = 0.42p = 0.12
Observations301297301297293
R20.070.170.460.510.53
Adjusted R20.060.160.410.450.46
Residual Std. Error0.95 (df = 299)0.91 (df = 293)0.76 (df = 276)0.74 (df = 262)0.73 (df = 255)
F Statistic21.55*** (df = 1; 299)19.97*** (df = 3; 293)9.69*** (df = 24; 276)8.00*** (df = 34; 262)7.69*** (df = 37; 255)
table_s20_subscales_MR6 <- stargazer(#r104_spev,
                                     r105_spev_MR6, r106_spev_MR6, 
                                     #r107_spev, 
                                     r108_spev_MR6, r109_spev_MR6, r110_spev_MR6, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^`Porosity Vignettes`$",
                                               "^`Altered states of consciousness \\(b\\)`$",
                                               "^`Porosity Vignettes`:`Altered states of consciousness \\(b\\)`$"),
                                     dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s20_subscales_MR6), 
    file = "./stargazer_tables/table_s20_subscales_MR6.html")
htmltools::includeHTML("./stargazer_tables/table_s20_subscales_MR6.html")
(1)(2)(3)(4)(5)
Porosity Vignettes0.33 (0.22, 0.43)0.32 (0.18, 0.46)0.29 (0.15, 0.44)
p = 0.00p = 0.00002p = 0.0001
Altered states of consciousness (b)0.18 (0.07, 0.29)0.12 (0.02, 0.23)0.19 (0.10, 0.29)0.16 (0.05, 0.28)0.17 (0.06, 0.29)
p = 0.002p = 0.03p = 0.0001p = 0.01p = 0.004
Porosity Vignettes:Altered states of consciousness (b)-0.02 (-0.13, 0.09)0.03 (-0.14, 0.20)0.03 (-0.15, 0.20)
p = 0.71p = 0.75p = 0.77
Country: Gh.0.15 (-0.02, 0.31)0.07 (-0.16, 0.31)0.08 (-0.16, 0.32)
p = 0.10p = 0.54p = 0.53
Country: Th.-0.07 (-0.28, 0.15)-0.13 (-0.36, 0.10)-0.14 (-0.38, 0.10)
p = 0.55p = 0.28p = 0.25
Country: Ch.-0.42 (-0.62, -0.23)-0.26 (-0.54, 0.02)-0.26 (-0.54, 0.02)
p = 0.00004p = 0.07p = 0.07
Country: Va.0.83 (0.62, 1.05)0.71 (0.48, 0.94)0.70 (0.44, 0.95)
p = 0.00p = 0.00p = 0.0000002
Site: rural0.03 (-0.07, 0.13)0.04 (-0.06, 0.14)0.05 (-0.06, 0.17)
p = 0.54p = 0.41p = 0.38
Religion: CC0.25 (0.15, 0.34)0.24 (0.14, 0.34)0.24 (0.14, 0.34)
p = 0.000002p = 0.000003p = 0.000004
Gender: male-0.08 (-0.18, 0.01)
p = 0.08
Age-0.09 (-0.20, 0.01)
p = 0.10
Education: at least HS-0.08 (-0.26, 0.10)
p = 0.38
Country: Gh. × Site: rural-0.27 (-0.44, -0.10)-0.30 (-0.47, -0.13)-0.27 (-0.45, -0.09)
p = 0.002p = 0.001p = 0.004
Country: Th. × Site: rural-0.06 (-0.28, 0.16)-0.05 (-0.26, 0.17)-0.04 (-0.25, 0.18)
p = 0.60p = 0.69p = 0.75
Country: Ch. × Site: rural0.44 (0.24, 0.63)0.43 (0.24, 0.62)0.41 (0.20, 0.62)
p = 0.00002p = 0.00003p = 0.0002
Country: Va. × Site: rural0.04 (-0.18, 0.25)0.07 (-0.16, 0.29)0.06 (-0.16, 0.28)
p = 0.73p = 0.56p = 0.61
Country: Gh. × Religion: CC-0.17 (-0.34, 0.01)-0.12 (-0.29, 0.05)-0.13 (-0.33, 0.08)
p = 0.07p = 0.17p = 0.23
Country: Th. × Religion: CC-0.13 (-0.34, 0.08)-0.18 (-0.39, 0.04)-0.16 (-0.38, 0.07)
p = 0.24p = 0.11p = 0.18
Country: Ch. × Religion: CC-0.08 (-0.28, 0.12)-0.08 (-0.28, 0.12)-0.11 (-0.31, 0.09)
p = 0.45p = 0.45p = 0.29
Country: Va. × Religion: CC0.10 (-0.11, 0.32)0.13 (-0.09, 0.35)0.14 (-0.08, 0.36)
p = 0.36p = 0.27p = 0.22
Site: rural × Religion: CC-0.11 (-0.21, -0.01)-0.10 (-0.20, -0.0001)-0.12 (-0.22, -0.02)
p = 0.03p = 0.06p = 0.02
Country: Gh. × Porosity Vignettes-0.21 (-0.43, -0.003)-0.20 (-0.41, 0.01)
p = 0.05p = 0.06
Country: Th. × Porosity Vignettes-0.03 (-0.29, 0.23)-0.02 (-0.28, 0.23)
p = 0.82p = 0.87
Country: Ch. × Porosity Vignettes-0.09 (-0.36, 0.18)-0.06 (-0.34, 0.21)
p = 0.52p = 0.64
Country: Va. × Porosity Vignettes0.44 (0.02, 0.87)0.40 (-0.02, 0.83)
p = 0.05p = 0.07
Country: Gh. × Altered states of consciousness (b)0.03 (-0.15, 0.20)0.07 (-0.14, 0.29)0.09 (-0.13, 0.30)
p = 0.76p = 0.52p = 0.44
Country: Th. × Altered states of consciousness (b)-0.16 (-0.35, 0.04)-0.16 (-0.37, 0.05)-0.15 (-0.36, 0.05)
p = 0.12p = 0.13p = 0.15
Country: Ch. × Altered states of consciousness (b)0.08 (-0.11, 0.28)0.06 (-0.23, 0.34)0.05 (-0.23, 0.34)
p = 0.41p = 0.71p = 0.72
Country: Va. × Altered states of consciousness (b)0.11 (-0.10, 0.31)0.06 (-0.15, 0.28)0.03 (-0.19, 0.25)
p = 0.33p = 0.58p = 0.79
Country: Gh. × Site: rural × Religion: CC-0.12 (-0.29, 0.06)-0.15 (-0.32, 0.02)-0.17 (-0.34, 0.01)
p = 0.19p = 0.09p = 0.06
Country: Th. × Site: rural × Religion: CC0.27 (0.06, 0.48)0.23 (0.02, 0.44)0.24 (0.03, 0.46)
p = 0.02p = 0.04p = 0.03
Country: Ch. × Site: rural × Religion: CC-0.12 (-0.31, 0.08)-0.11 (-0.31, 0.09)-0.11 (-0.30, 0.09)
p = 0.24p = 0.28p = 0.28
Country: Va. × Site: rural × Religion: CC-0.02 (-0.24, 0.19)0.03 (-0.19, 0.25)0.04 (-0.18, 0.26)
p = 0.84p = 0.77p = 0.75
Country: Gh. × Porosity Vignettes:Altered states of consciousness (b)-0.09 (-0.32, 0.14)-0.11 (-0.33, 0.12)
p = 0.44p = 0.36
Country: Th. × Porosity Vignettes:Altered states of consciousness (b)-0.16 (-0.50, 0.19)-0.20 (-0.55, 0.14)
p = 0.38p = 0.25
Country: Ch. × Porosity Vignettes:Altered states of consciousness (b)-0.02 (-0.30, 0.26)-0.004 (-0.28, 0.28)
p = 0.88p = 0.98
Country: Va. × Porosity Vignettes:Altered states of consciousness (b)0.29 (-0.25, 0.83)0.32 (-0.22, 0.86)
p = 0.30p = 0.25
Constant-0.01 (-0.12, 0.10)-0.01 (-0.12, 0.10)0.02 (-0.08, 0.11)0.03 (-0.09, 0.15)0.06 (-0.07, 0.20)
p = 0.83p = 0.85p = 0.73p = 0.63p = 0.37
Observations301297301297293
R20.030.140.420.470.49
Adjusted R20.030.130.370.410.42
Residual Std. Error0.97 (df = 299)0.92 (df = 293)0.78 (df = 276)0.76 (df = 262)0.76 (df = 255)
F Statistic10.32*** (df = 1; 299)15.71*** (df = 3; 293)8.46*** (df = 24; 276)6.93*** (df = 34; 262)6.69*** (df = 37; 255)

Study 3

Reliability

# reliability
bind_rows(MR1 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s3_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR1") %>% 
                                         pull(question)))),
          MR2 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s3_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR2") %>% 
                                         pull(question)))),
          MR3 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s3_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR3") %>% 
                                         pull(question)))),
          MR4 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s3_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR4") %>% 
                                         pull(question)))),
          MR5 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s3_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR5") %>% 
                                         pull(question)))),
          MR6 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s3_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR6") %>% 
                                         pull(question)))))

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Relationships (analog to Table S32)

d3_abs_subscales <- d3_abs %>%
  rownames_to_column("subject_id") %>%
  gather(question, response, -subject_id) %>%
  mutate(question = gsub("_abs", "", question)) %>%
  left_join(d_all_all_scales %>% distinct(question, factor)) %>% 
  filter(!is.na(factor)) %>%
  mutate(factorlab = recode_factor(factor,
                                   "MR1" = "Synesthesia",
                                   "MR2" = "Aesthetic involvement in nature",
                                   "MR3" = "Altered states of consciousness (a)",
                                   "MR4" = "Imaginative involvement",
                                   "MR5" = "Sensed presence",
                                   "MR6" = "Altered states of consciousness (b)")) %>% 
  group_by(subject_id, factor, factorlab) %>%
  summarise(score = mean(response, na.rm = T)) %>%
  ungroup() %>%
  mutate(subject_id = as.numeric(subject_id)) %>%
  left_join(d3 %>% distinct(subject_id, country)) %>%
  group_by(country, factor, factorlab) %>%
  mutate(score = scale(score)) %>%
  ungroup() %>%
  select(-country, -factor) %>%
  spread(factorlab, score) %>%
  mutate_all(as.numeric) %>%
  left_join(d3_fortab)
Joining, by = "question"
`summarise()` has grouped output by 'subject_id', 'factor'. You can override using the `.groups` argument.
Joining, by = "subject_id"
Joining, by = "subject_id"
r103_spev_MR1 <- lm(`Spiritual Events` ~ `Synesthesia`,
                    data = d3_abs_subscales)
r103_spev_MR2 <- lm(`Spiritual Events` ~ `Aesthetic involvement in nature`,
                    data = d3_abs_subscales)
r103_spev_MR3 <- lm(`Spiritual Events` ~ `Altered states of consciousness (a)`,
                    data = d3_abs_subscales)
r103_spev_MR4 <- lm(`Spiritual Events` ~ `Imaginative involvement`,
                    data = d3_abs_subscales)
r103_spev_MR5 <- lm(`Spiritual Events` ~ `Sensed presence`,
                    data = d3_abs_subscales)
r103_spev_MR6 <- lm(`Spiritual Events` ~ `Altered states of consciousness (b)`,
                    data = d3_abs_subscales)

r104_spev_MR1 <- lm(`Spiritual Events` ~ Country * `Synesthesia`,
                    data = d3_abs_subscales)
r104_spev_MR2 <- lm(`Spiritual Events` ~ Country * `Aesthetic involvement in nature`,
                    data = d3_abs_subscales)
r104_spev_MR3 <- lm(`Spiritual Events` ~ Country * `Altered states of consciousness (a)`,
                    data = d3_abs_subscales)
r104_spev_MR4 <- lm(`Spiritual Events` ~ Country * `Imaginative involvement`,
                    data = d3_abs_subscales)
r104_spev_MR5 <- lm(`Spiritual Events` ~ Country * `Sensed presence`,
                    data = d3_abs_subscales)
r104_spev_MR6 <- lm(`Spiritual Events` ~ Country * `Altered states of consciousness (b)`,
                    data = d3_abs_subscales)

r105_spev_MR1 <- lm(`Spiritual Events` ~ Country * `Synesthesia`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_spev_MR2 <- lm(`Spiritual Events` ~ Country * `Aesthetic involvement in nature`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_spev_MR3 <- lm(`Spiritual Events` ~ Country * `Altered states of consciousness (a)`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_spev_MR4 <- lm(`Spiritual Events` ~ Country * `Imaginative involvement`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_spev_MR5 <- lm(`Spiritual Events` ~ Country * `Sensed presence`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_spev_MR6 <- lm(`Spiritual Events` ~ Country * `Altered states of consciousness (b)`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r103_dse_MR1 <- lm(`Daily Spiritual Experiences` ~ `Synesthesia`,
                    data = d3_abs_subscales)
r103_dse_MR2 <- lm(`Daily Spiritual Experiences` ~ `Aesthetic involvement in nature`,
                    data = d3_abs_subscales)
r103_dse_MR3 <- lm(`Daily Spiritual Experiences` ~ `Altered states of consciousness (a)`,
                    data = d3_abs_subscales)
r103_dse_MR4 <- lm(`Daily Spiritual Experiences` ~ `Imaginative involvement`,
                    data = d3_abs_subscales)
r103_dse_MR5 <- lm(`Daily Spiritual Experiences` ~ `Sensed presence`,
                    data = d3_abs_subscales)
r103_dse_MR6 <- lm(`Daily Spiritual Experiences` ~ `Altered states of consciousness (b)`,
                    data = d3_abs_subscales)

r104_dse_MR1 <- lm(`Daily Spiritual Experiences` ~ Country * `Synesthesia`,
                    data = d3_abs_subscales)
r104_dse_MR2 <- lm(`Daily Spiritual Experiences` ~ Country * `Aesthetic involvement in nature`,
                    data = d3_abs_subscales)
r104_dse_MR3 <- lm(`Daily Spiritual Experiences` ~ Country * `Altered states of consciousness (a)`,
                    data = d3_abs_subscales)
r104_dse_MR4 <- lm(`Daily Spiritual Experiences` ~ Country * `Imaginative involvement`,
                    data = d3_abs_subscales)
r104_dse_MR5 <- lm(`Daily Spiritual Experiences` ~ Country * `Sensed presence`,
                    data = d3_abs_subscales)
r104_dse_MR6 <- lm(`Daily Spiritual Experiences` ~ Country * `Altered states of consciousness (b)`,
                    data = d3_abs_subscales)

r105_dse_MR1 <- lm(`Daily Spiritual Experiences` ~ Country * `Synesthesia`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_dse_MR2 <- lm(`Daily Spiritual Experiences` ~ Country * `Aesthetic involvement in nature`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_dse_MR3 <- lm(`Daily Spiritual Experiences` ~ Country * `Altered states of consciousness (a)`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_dse_MR4 <- lm(`Daily Spiritual Experiences` ~ Country * `Imaginative involvement`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_dse_MR5 <- lm(`Daily Spiritual Experiences` ~ Country * `Sensed presence`
                    + Gender + Age,  
                    data = d3_abs_subscales)
r105_dse_MR6 <- lm(`Daily Spiritual Experiences` ~ Country * `Altered states of consciousness (b)`
                    + Gender + Age,  
                    data = d3_abs_subscales)
table_s32_subscales <- stargazer(
  r103_spev_MR1, r103_spev_MR2, r103_spev_MR3, r103_spev_MR4, r103_spev_MR5, r103_spev_MR6,  
  r104_spev_MR1, r104_spev_MR2, r104_spev_MR3, r104_spev_MR4, r104_spev_MR5, r104_spev_MR6,  
  r105_spev_MR1, r105_spev_MR2, r105_spev_MR3, r105_spev_MR4, r105_spev_MR5, r105_spev_MR6,  
  r103_dse_MR1, r103_dse_MR2, r103_dse_MR3, r103_dse_MR4, r103_dse_MR5, r103_dse_MR6,  
  r104_dse_MR1, r104_dse_MR2, r104_dse_MR3, r104_dse_MR4, r104_dse_MR5, r104_dse_MR6,  
  r105_dse_MR1, r105_dse_MR2, r105_dse_MR3, r105_dse_MR4, r105_dse_MR5, r105_dse_MR6,  
                       type = "html",
                       ci = T,
                       report = c("vcsp"),
                       digits = 2,
                       digits.extra = 1000,
                       omit.table.layout = "n",
                       order = c("^`Synesthesia`$",
                                 "^`Aesthetic involvement in nature`$",
                                 "^`Altered states of consciousness \\(a\\)`$",
                                 "^`Imaginative involvement`$",
                                 "^`Sensed presence`$",
                                 "^`Altered states of consciousness \\(b\\)`$"),
                       # dep.var.labels.include = F,
                       dep.var.caption = "",
                       single.row = T)
cat(sub_interact_fun(table_s32_subscales), 
    file = "./stargazer_tables/table_s32_subscales.html")
# htmltools::includeHTML("./stargazer_tables/table_s32_subscales.html")
table_s32_subscales_MR1 <- stargazer(r103_spev_MR1, r104_spev_MR1, r105_spev_MR1, 
                                     r103_dse_MR1, r104_dse_MR1, r105_dse_MR1, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^Synesthesia$",
                                               "^`Aesthetic involvement in nature`$",
                                               "^`Altered states of consciousness \\(a\\)`$",
                                               "^`Imaginative involvement`$",
                                               "^`Sensed presence`$",
                                               "^`Altered states of consciousness \\(b\\)`$"),
                                     # dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s32_subscales_MR1), 
    file = "./stargazer_tables/table_s32_subscales_MR1.html")
htmltools::includeHTML("./stargazer_tables/table_s32_subscales_MR1.html")
Spiritual EventsDaily Spiritual Experiences
(1)(2)(3)(4)(5)(6)
Synesthesia0.20 (0.12, 0.29)0.20 (0.14, 0.27)0.20 (0.13, 0.26)0.09 (0.004, 0.18)0.09 (0.03, 0.15)0.08 (0.02, 0.14)
p = 0.000005p = 0.00p = 0.00000002p = 0.05p = 0.01p = 0.01
Country: Gh.0.89 (0.75, 1.02)0.90 (0.76, 1.03)0.87 (0.75, 1.00)0.89 (0.76, 1.01)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.50 (-0.63, -0.37)-0.48 (-0.62, -0.35)-0.18 (-0.30, -0.06)-0.18 (-0.31, -0.06)
p = 0.00p = 0.00p = 0.003p = 0.005
Country: Ch.-0.67 (-0.80, -0.54)-0.68 (-0.81, -0.54)-1.13 (-1.25, -1.01)-1.14 (-1.26, -1.02)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.59 (0.46, 0.72)0.52 (0.37, 0.68)0.66 (0.53, 0.78)0.59 (0.45, 0.73)
p = 0.00p = 0.00p = 0.00p = 0.00
Gender: male-0.02 (-0.10, 0.05)-0.07 (-0.13, -0.004)
p = 0.50p = 0.04
Age0.08 (-0.01, 0.16)0.09 (0.01, 0.16)
p = 0.08p = 0.03
Country: Gh. × Synesthesia0.14 (0.002, 0.27)0.14 (0.005, 0.28)-0.09 (-0.22, 0.03)-0.09 (-0.22, 0.03)
p = 0.05p = 0.05p = 0.15p = 0.16
Country: Th. × Synesthesia-0.04 (-0.17, 0.09)-0.04 (-0.17, 0.10)0.10 (-0.02, 0.22)0.10 (-0.02, 0.22)
p = 0.58p = 0.60p = 0.10p = 0.10
Country: Ch. × Synesthesia-0.15 (-0.28, -0.02)-0.15 (-0.28, -0.01)-0.08 (-0.20, 0.05)-0.08 (-0.20, 0.04)
p = 0.03p = 0.04p = 0.23p = 0.20
Country: Va. × Synesthesia0.07 (-0.07, 0.20)0.05 (-0.09, 0.19)0.07 (-0.05, 0.19)0.05 (-0.07, 0.18)
p = 0.32p = 0.47p = 0.28p = 0.39
Constant0.00 (-0.08, 0.08)0.03 (-0.04, 0.09)0.02 (-0.04, 0.09)0.00 (-0.09, 0.09)0.02 (-0.04, 0.08)0.01 (-0.05, 0.07)
p = 1.00p = 0.45p = 0.51p = 1.00p = 0.51p = 0.71
Observations519519513519519513
R20.040.430.430.010.510.52
Adjusted R20.040.420.420.010.510.51
Residual Std. Error0.98 (df = 517)0.76 (df = 509)0.77 (df = 501)1.00 (df = 517)0.70 (df = 509)0.70 (df = 501)
F Statistic21.56*** (df = 1; 517)42.08*** (df = 9; 509)34.12*** (df = 11; 501)4.16** (df = 1; 517)59.76*** (df = 9; 509)49.64*** (df = 11; 501)
table_s32_subscales_MR2 <- stargazer(r103_spev_MR2, r104_spev_MR2, r105_spev_MR2, 
                                     r103_dse_MR2, r104_dse_MR2, r105_dse_MR2, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^Synesthesia$",
                                               "^`Aesthetic involvement in nature`$",
                                               "^`Altered states of consciousness \\(a\\)`$",
                                               "^`Imaginative involvement`$",
                                               "^`Sensed presence`$",
                                               "^`Altered states of consciousness \\(b\\)`$"),
                                     # dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s32_subscales_MR2), 
    file = "./stargazer_tables/table_s32_subscales_MR2.html")
htmltools::includeHTML("./stargazer_tables/table_s32_subscales_MR2.html")
Spiritual EventsDaily Spiritual Experiences
(1)(2)(3)(4)(5)(6)
Aesthetic involvement in nature0.14 (0.06, 0.23)0.15 (0.08, 0.21)0.15 (0.08, 0.21)0.14 (0.05, 0.23)0.14 (0.08, 0.20)0.13 (0.07, 0.19)
p = 0.002p = 0.00002p = 0.00003p = 0.002p = 0.00001p = 0.00002
Country: Gh.0.89 (0.75, 1.02)0.90 (0.76, 1.04)0.87 (0.75, 1.00)0.89 (0.76, 1.01)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.50 (-0.63, -0.37)-0.48 (-0.61, -0.34)-0.18 (-0.30, -0.06)-0.17 (-0.30, -0.05)
p = 0.00p = 0.00p = 0.003p = 0.01
Country: Ch.-0.67 (-0.80, -0.54)-0.68 (-0.81, -0.54)-1.13 (-1.25, -1.01)-1.14 (-1.26, -1.02)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.59 (0.45, 0.72)0.50 (0.34, 0.66)0.66 (0.53, 0.78)0.58 (0.44, 0.72)
p = 0.00p = 0.00p = 0.00p = 0.00
Gender: male-0.02 (-0.09, 0.05)-0.05 (-0.12, 0.01)
p = 0.62p = 0.11
Age0.09 (0.01, 0.17)0.09 (0.02, 0.16)
p = 0.04p = 0.02
Country: Gh. × Aesthetic involvement in nature0.21 (0.08, 0.35)0.22 (0.08, 0.36)-0.01 (-0.13, 0.12)0.001 (-0.12, 0.12)
p = 0.003p = 0.002p = 0.90p = 0.99
Country: Th. × Aesthetic involvement in nature-0.07 (-0.20, 0.06)-0.07 (-0.20, 0.06)0.05 (-0.07, 0.17)0.05 (-0.07, 0.16)
p = 0.33p = 0.31p = 0.43p = 0.45
Country: Ch. × Aesthetic involvement in nature-0.08 (-0.21, 0.06)-0.08 (-0.21, 0.06)-0.06 (-0.18, 0.06)-0.06 (-0.18, 0.06)
p = 0.26p = 0.27p = 0.33p = 0.31
Country: Va. × Aesthetic involvement in nature-0.05 (-0.18, 0.09)-0.05 (-0.19, 0.09)-0.07 (-0.19, 0.05)-0.07 (-0.19, 0.06)
p = 0.50p = 0.48p = 0.25p = 0.29
Constant0.00 (-0.09, 0.09)0.03 (-0.04, 0.09)0.02 (-0.04, 0.09)0.00 (-0.09, 0.09)0.02 (-0.04, 0.08)0.01 (-0.05, 0.07)
p = 1.00p = 0.46p = 0.51p = 1.00p = 0.51p = 0.71
Observations519519513519519513
R20.020.410.420.020.520.53
Adjusted R20.020.400.400.020.510.52
Residual Std. Error0.99 (df = 517)0.78 (df = 509)0.77 (df = 501)0.99 (df = 517)0.70 (df = 509)0.69 (df = 501)
F Statistic10.89*** (df = 1; 517)39.16*** (df = 9; 509)32.34*** (df = 11; 501)10.17*** (df = 1; 517)62.06*** (df = 9; 509)51.48*** (df = 11; 501)
table_s32_subscales_MR3 <- stargazer(r103_spev_MR3, r104_spev_MR3, r105_spev_MR3, 
                                     r103_dse_MR3, r104_dse_MR3, r105_dse_MR3, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^Synesthesia$",
                                               "^`Aesthetic involvement in nature`$",
                                               "^`Altered states of consciousness \\(a\\)`$",
                                               "^`Imaginative involvement`$",
                                               "^`Sensed presence`$",
                                               "^`Altered states of consciousness \\(b\\)`$"),
                                     # dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s32_subscales_MR3), 
    file = "./stargazer_tables/table_s32_subscales_MR3.html")
htmltools::includeHTML("./stargazer_tables/table_s32_subscales_MR3.html")
Spiritual EventsDaily Spiritual Experiences
(1)(2)(3)(4)(5)(6)
Altered states of consciousness (a)0.20 (0.12, 0.29)0.21 (0.14, 0.27)0.21 (0.15, 0.28)0.13 (0.04, 0.21)0.13 (0.07, 0.19)0.13 (0.07, 0.19)
p = 0.000005p = 0.00p = 0.00p = 0.005p = 0.00005p = 0.00004
Country: Gh.0.89 (0.75, 1.02)0.90 (0.76, 1.03)0.87 (0.75, 1.00)0.89 (0.76, 1.01)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.50 (-0.63, -0.38)-0.48 (-0.61, -0.34)-0.18 (-0.30, -0.06)-0.17 (-0.30, -0.05)
p = 0.00p = 0.00p = 0.003p = 0.01
Country: Ch.-0.67 (-0.80, -0.54)-0.67 (-0.81, -0.54)-1.13 (-1.25, -1.01)-1.14 (-1.26, -1.02)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.59 (0.46, 0.72)0.51 (0.36, 0.66)0.66 (0.53, 0.78)0.58 (0.44, 0.72)
p = 0.00p = 0.00p = 0.00p = 0.00
Gender: male-0.01 (-0.08, 0.06)-0.06 (-0.12, 0.01)
p = 0.82p = 0.10
Age0.07 (-0.01, 0.15)0.09 (0.02, 0.16)
p = 0.08p = 0.02
Country: Gh. × Altered states of consciousness (a)0.19 (0.06, 0.33)0.18 (0.04, 0.31)0.06 (-0.07, 0.18)0.05 (-0.08, 0.17)
p = 0.01p = 0.01p = 0.37p = 0.46
Country: Th. × Altered states of consciousness (a)-0.18 (-0.31, -0.05)-0.17 (-0.30, -0.04)-0.07 (-0.18, 0.05)-0.06 (-0.18, 0.05)
p = 0.01p = 0.01p = 0.27p = 0.30
Country: Ch. × Altered states of consciousness (a)-0.10 (-0.23, 0.03)-0.09 (-0.23, 0.04)-0.05 (-0.17, 0.07)-0.05 (-0.17, 0.07)
p = 0.16p = 0.17p = 0.40p = 0.45
Country: Va. × Altered states of consciousness (a)0.10 (-0.03, 0.24)0.11 (-0.02, 0.25)-0.02 (-0.14, 0.10)-0.02 (-0.14, 0.10)
p = 0.14p = 0.11p = 0.78p = 0.75
Constant0.00 (-0.08, 0.08)0.03 (-0.04, 0.09)0.02 (-0.04, 0.09)0.00 (-0.09, 0.09)0.02 (-0.04, 0.08)0.01 (-0.05, 0.07)
p = 1.00p = 0.45p = 0.52p = 1.00p = 0.51p = 0.73
Observations519519513519519513
R20.040.430.440.020.520.53
Adjusted R20.040.420.430.010.510.52
Residual Std. Error0.98 (df = 517)0.76 (df = 509)0.76 (df = 501)0.99 (df = 517)0.70 (df = 509)0.70 (df = 501)
F Statistic21.63*** (df = 1; 517)43.53*** (df = 9; 509)35.90*** (df = 11; 501)8.26*** (df = 1; 517)61.05*** (df = 9; 509)50.93*** (df = 11; 501)
table_s32_subscales_MR4 <- stargazer(r103_spev_MR4, r104_spev_MR4, r105_spev_MR4, 
                                     r103_dse_MR4, r104_dse_MR4, r105_dse_MR4, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^Synesthesia$",
                                               "^`Aesthetic involvement in nature`$",
                                               "^`Altered states of consciousness \\(a\\)`$",
                                               "^`Imaginative involvement`$",
                                               "^`Sensed presence`$",
                                               "^`Altered states of consciousness \\(b\\)`$"),
                                     # dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s32_subscales_MR4), 
    file = "./stargazer_tables/table_s32_subscales_MR4.html")
htmltools::includeHTML("./stargazer_tables/table_s32_subscales_MR4.html")
Spiritual EventsDaily Spiritual Experiences
(1)(2)(3)(4)(5)(6)
Imaginative involvement0.15 (0.07, 0.24)0.16 (0.09, 0.23)0.16 (0.09, 0.22)0.09 (0.004, 0.18)0.09 (0.03, 0.15)0.09 (0.03, 0.15)
p = 0.0005p = 0.000004p = 0.00001p = 0.05p = 0.004p = 0.005
Country: Gh.0.89 (0.75, 1.02)0.90 (0.76, 1.03)0.87 (0.75, 1.00)0.89 (0.76, 1.01)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.50 (-0.63, -0.37)-0.48 (-0.61, -0.34)-0.18 (-0.30, -0.06)-0.17 (-0.30, -0.05)
p = 0.00p = 0.00p = 0.003p = 0.01
Country: Ch.-0.67 (-0.80, -0.54)-0.68 (-0.81, -0.54)-1.13 (-1.25, -1.01)-1.14 (-1.26, -1.02)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.59 (0.45, 0.72)0.50 (0.34, 0.66)0.66 (0.53, 0.78)0.57 (0.43, 0.71)
p = 0.00p = 0.00p = 0.00p = 0.00
Gender: male-0.02 (-0.10, 0.05)-0.07 (-0.14, -0.01)
p = 0.52p = 0.03
Age0.09 (0.01, 0.18)0.11 (0.04, 0.18)
p = 0.03p = 0.004
Country: Gh. × Imaginative involvement0.17 (0.03, 0.31)0.17 (0.03, 0.31)0.10 (-0.02, 0.23)0.10 (-0.02, 0.23)
p = 0.02p = 0.02p = 0.11p = 0.11
Country: Th. × Imaginative involvement-0.16 (-0.29, -0.03)-0.15 (-0.28, -0.02)0.01 (-0.11, 0.13)0.01 (-0.11, 0.13)
p = 0.02p = 0.03p = 0.84p = 0.85
Country: Ch. × Imaginative involvement0.03 (-0.10, 0.16)0.05 (-0.09, 0.18)0.07 (-0.05, 0.19)0.09 (-0.03, 0.21)
p = 0.66p = 0.51p = 0.26p = 0.14
Country: Va. × Imaginative involvement-0.02 (-0.15, 0.12)-0.04 (-0.18, 0.10)-0.13 (-0.25, -0.01)-0.17 (-0.29, -0.04)
p = 0.83p = 0.56p = 0.04p = 0.01
Constant0.00 (-0.09, 0.09)0.03 (-0.04, 0.09)0.02 (-0.04, 0.09)0.00 (-0.09, 0.09)0.02 (-0.04, 0.08)0.01 (-0.05, 0.07)
p = 1.00p = 0.46p = 0.52p = 1.00p = 0.51p = 0.75
Observations519519513519519513
R20.020.410.420.010.510.53
Adjusted R20.020.400.400.010.510.52
Residual Std. Error0.99 (df = 517)0.77 (df = 509)0.77 (df = 501)1.00 (df = 517)0.70 (df = 509)0.70 (df = 501)
F Statistic12.62*** (df = 1; 517)39.63*** (df = 9; 509)32.55*** (df = 11; 501)4.19** (df = 1; 517)60.00*** (df = 9; 509)50.51*** (df = 11; 501)
table_s32_subscales_MR5 <- stargazer(r103_spev_MR5, r104_spev_MR5, r105_spev_MR5, 
                                     r103_dse_MR5, r104_dse_MR5, r105_dse_MR5, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^Synesthesia$",
                                               "^`Aesthetic involvement in nature`$",
                                               "^`Altered states of consciousness \\(a\\)`$",
                                               "^`Imaginative involvement`$",
                                               "^`Sensed presence`$",
                                               "^`Altered states of consciousness \\(b\\)`$"),
                                     # dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s32_subscales_MR5), 
    file = "./stargazer_tables/table_s32_subscales_MR5.html")
htmltools::includeHTML("./stargazer_tables/table_s32_subscales_MR5.html")
Spiritual EventsDaily Spiritual Experiences
(1)(2)(3)(4)(5)(6)
Sensed presence0.29 (0.21, 0.37)0.29 (0.23, 0.36)0.29 (0.23, 0.36)0.18 (0.09, 0.26)0.18 (0.12, 0.24)0.18 (0.12, 0.24)
p = 0.00p = 0.00p = 0.00p = 0.00005p = 0.00p = 0.00
Country: Gh.0.89 (0.76, 1.02)0.90 (0.77, 1.03)0.87 (0.75, 1.00)0.89 (0.77, 1.01)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.50 (-0.63, -0.38)-0.48 (-0.61, -0.35)-0.18 (-0.29, -0.06)-0.17 (-0.29, -0.05)
p = 0.00p = 0.00p = 0.003p = 0.01
Country: Ch.-0.67 (-0.80, -0.54)-0.68 (-0.80, -0.55)-1.13 (-1.25, -1.01)-1.14 (-1.25, -1.02)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.59 (0.46, 0.72)0.51 (0.36, 0.66)0.66 (0.54, 0.78)0.58 (0.44, 0.72)
p = 0.00p = 0.00p = 0.00p = 0.00
Gender: male-0.02 (-0.09, 0.05)-0.06 (-0.12, 0.01)
p = 0.60p = 0.08
Age0.08 (0.001, 0.16)0.09 (0.02, 0.16)
p = 0.05p = 0.02
Country: Gh. × Sensed presence0.14 (0.01, 0.27)0.13 (-0.001, 0.26)-0.04 (-0.16, 0.09)-0.05 (-0.17, 0.08)
p = 0.04p = 0.06p = 0.56p = 0.47
Country: Th. × Sensed presence-0.10 (-0.22, 0.03)-0.09 (-0.22, 0.03)0.04 (-0.07, 0.16)0.04 (-0.07, 0.16)
p = 0.13p = 0.15p = 0.46p = 0.45
Country: Ch. × Sensed presence-0.09 (-0.22, 0.04)-0.09 (-0.22, 0.04)0.004 (-0.12, 0.12)0.01 (-0.11, 0.12)
p = 0.17p = 0.18p = 0.96p = 0.92
Country: Va. × Sensed presence0.02 (-0.11, 0.15)0.02 (-0.11, 0.15)-0.10 (-0.22, 0.02)-0.10 (-0.22, 0.02)
p = 0.80p = 0.78p = 0.11p = 0.12
Constant0.00 (-0.08, 0.08)0.03 (-0.04, 0.09)0.02 (-0.04, 0.09)0.00 (-0.08, 0.08)0.02 (-0.04, 0.08)0.01 (-0.05, 0.07)
p = 1.00p = 0.44p = 0.51p = 1.00p = 0.50p = 0.72
Observations519519513519519513
R20.080.470.470.030.540.55
Adjusted R20.080.460.460.030.530.54
Residual Std. Error0.96 (df = 517)0.74 (df = 509)0.74 (df = 501)0.98 (df = 517)0.69 (df = 509)0.68 (df = 501)
F Statistic46.39*** (df = 1; 517)49.59*** (df = 9; 509)40.86*** (df = 11; 501)17.09*** (df = 1; 517)65.34*** (df = 9; 509)54.80*** (df = 11; 501)
table_s32_subscales_MR6 <- stargazer(r103_spev_MR6, r104_spev_MR6, r105_spev_MR6, 
                                     r103_dse_MR6, r104_dse_MR6, r105_dse_MR6, 
                                     type = "html",
                                     ci = T,
                                     report = c("vcsp"),
                                     digits = 2,
                                     digits.extra = 1000,
                                     omit.table.layout = "n",
                                     order = c("^Synesthesia$",
                                               "^`Aesthetic involvement in nature`$",
                                               "^`Altered states of consciousness \\(a\\)`$",
                                               "^`Imaginative involvement`$",
                                               "^`Sensed presence`$",
                                               "^`Altered states of consciousness \\(b\\)`$"),
                                     # dep.var.labels.include = F,
                                     dep.var.caption = "",
                                     single.row = T)
cat(sub_interact_fun(table_s32_subscales_MR6), 
    file = "./stargazer_tables/table_s32_subscales_MR6.html")
htmltools::includeHTML("./stargazer_tables/table_s32_subscales_MR6.html")
Spiritual EventsDaily Spiritual Experiences
(1)(2)(3)(4)(5)(6)
Altered states of consciousness (b)0.28 (0.20, 0.36)0.28 (0.22, 0.35)0.29 (0.22, 0.35)0.17 (0.09, 0.26)0.17 (0.11, 0.23)0.18 (0.12, 0.24)
p = 0.00p = 0.00p = 0.00p = 0.0001p = 0.00000003p = 0.00
Country: Gh.0.89 (0.76, 1.02)0.90 (0.77, 1.03)0.87 (0.75, 1.00)0.89 (0.77, 1.01)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.50 (-0.63, -0.38)-0.49 (-0.62, -0.36)-0.18 (-0.30, -0.06)-0.18 (-0.31, -0.06)
p = 0.00p = 0.00p = 0.003p = 0.004
Country: Ch.-0.67 (-0.80, -0.54)-0.68 (-0.80, -0.55)-1.13 (-1.25, -1.01)-1.14 (-1.26, -1.02)
p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.59 (0.46, 0.72)0.52 (0.38, 0.67)0.66 (0.54, 0.78)0.59 (0.45, 0.73)
p = 0.00p = 0.00p = 0.00p = 0.00
Gender: male-0.04 (-0.11, 0.03)-0.08 (-0.14, -0.02)
p = 0.26p = 0.02
Age0.07 (-0.003, 0.15)0.09 (0.02, 0.16)
p = 0.06p = 0.02
Country: Gh. × Altered states of consciousness (b)0.10 (-0.03, 0.23)0.10 (-0.03, 0.23)0.03 (-0.09, 0.15)0.02 (-0.10, 0.14)
p = 0.14p = 0.13p = 0.66p = 0.75
Country: Th. × Altered states of consciousness (b)-0.15 (-0.28, -0.03)-0.16 (-0.28, -0.03)0.04 (-0.07, 0.16)0.04 (-0.08, 0.15)
p = 0.02p = 0.02p = 0.47p = 0.55
Country: Ch. × Altered states of consciousness (b)-0.13 (-0.25, 0.002)-0.12 (-0.25, 0.01)-0.06 (-0.18, 0.06)-0.05 (-0.16, 0.07)
p = 0.06p = 0.07p = 0.36p = 0.46
Country: Va. × Altered states of consciousness (b)0.10 (-0.03, 0.23)0.09 (-0.04, 0.22)-0.06 (-0.18, 0.06)-0.07 (-0.19, 0.05)
p = 0.14p = 0.19p = 0.37p = 0.27
Constant0.00 (-0.08, 0.08)0.03 (-0.04, 0.09)0.02 (-0.04, 0.09)0.00 (-0.08, 0.08)0.02 (-0.04, 0.08)0.01 (-0.05, 0.07)
p = 1.00p = 0.44p = 0.47p = 1.00p = 0.51p = 0.71
Observations519519513519519513
R20.080.470.470.030.530.54
Adjusted R20.080.460.460.030.520.53
Residual Std. Error0.96 (df = 517)0.74 (df = 509)0.74 (df = 501)0.99 (df = 517)0.69 (df = 509)0.69 (df = 501)
F Statistic43.67*** (df = 1; 517)49.83*** (df = 9; 509)41.00*** (df = 11; 501)16.06*** (df = 1; 517)64.32*** (df = 9; 509)54.03*** (df = 11; 501)

Study 4

Reliability

# reliability
bind_rows(MR1 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s4_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR1") %>% 
                                         pull(question)))),
          MR2 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s4_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR2") %>% 
                                         pull(question)))),
          MR3 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s4_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR3") %>% 
                                         pull(question)))),
          MR4 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s4_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR4") %>% 
                                         pull(question)))),
          MR5 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s4_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR5") %>% 
                                         pull(question)))),
          MR6 = summary(alpha(d_all_abs %>%
                                rownames_to_column("subject_id") %>% 
                                filter(grepl("s4_", subject_id)) %>%
                                column_to_rownames("subject_id") %>%
                                select(d_all_all_scales %>% 
                                         filter(factor == "MR6") %>% 
                                         pull(question)))))

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Reliability analysis   

Relationships (analog to Tables S40-S41)

d4_abs_subscales <- d_all_abs %>%
  rownames_to_column("subject_id") %>% 
  filter(grepl("s4_", subject_id)) %>%
  gather(question, response, -subject_id) %>%
  left_join(d_all_all_scales %>% distinct(question, factor)) %>% 
  filter(!is.na(factor)) %>%
  mutate(factorlab = recode_factor(factor,
                                   "MR1" = "Synesthesia",
                                   "MR2" = "Aesthetic involvement in nature",
                                   "MR3" = "Altered states of consciousness (a)",
                                   "MR4" = "Imaginative involvement",
                                   "MR5" = "Sensed presence",
                                   "MR6" = "Altered states of consciousness (b)")) %>% 
  group_by(subject_id, factor, factorlab) %>%
  summarise(score = mean(response, na.rm = T)) %>%
  ungroup() %>%
  mutate(subject_id = as.numeric(gsub("s4_", "", subject_id))) %>%
  left_join(d4 %>% distinct(subject_id, country)) %>%
  group_by(country, factor, factorlab) %>%
  mutate(score = scale(score)) %>%
  ungroup() %>%
  select(-country, -factor) %>%
  spread(factorlab, score) %>%
  mutate_all(as.numeric) %>%
  left_join(d4_fortab_long_spirit)
Joining, by = "question"
`summarise()` has grouped output by 'subject_id', 'factor'. You can override using the `.groups` argument.
Joining, by = "subject_id"
Joining, by = "subject_id"

Analog to Table S40

r105_spirit_MR1 <- lmer(Score ~ Scale * Synesthesia
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r108_spirit_MR1 <- lmer(Score ~ Scale * Country * Synesthesia
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r109_spirit_MR1 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * Synesthesia
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r110_spirit_MR1 <- lmer(Score ~ Scale * Country * `Porosity Scale` * Synesthesia
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r111_spirit_MR1 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * Synesthesia
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r112_spirit_MR1 <- lmer(Score ~ Scale * Country * `Porosity Scale` * Synesthesia
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)
r105_spirit_MR2 <- lmer(Score ~ Scale * `Aesthetic involvement in nature`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r108_spirit_MR2 <- lmer(Score ~ Scale * Country * `Aesthetic involvement in nature`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r109_spirit_MR2 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Aesthetic involvement in nature`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r110_spirit_MR2 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Aesthetic involvement in nature`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r111_spirit_MR2 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Aesthetic involvement in nature`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r112_spirit_MR2 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Aesthetic involvement in nature`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)
r105_spirit_MR3 <- lmer(Score ~ Scale * `Altered states of consciousness (a)`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r108_spirit_MR3 <- lmer(Score ~ Scale * Country * `Altered states of consciousness (a)`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r109_spirit_MR3 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Altered states of consciousness (a)`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r110_spirit_MR3 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Altered states of consciousness (a)`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r111_spirit_MR3 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Altered states of consciousness (a)`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r112_spirit_MR3 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Altered states of consciousness (a)`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)
r105_spirit_MR4 <- lmer(Score ~ Scale * `Imaginative involvement`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r108_spirit_MR4 <- lmer(Score ~ Scale * Country * `Imaginative involvement`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r109_spirit_MR4 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Imaginative involvement`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r110_spirit_MR4 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Imaginative involvement`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r111_spirit_MR4 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Imaginative involvement`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r112_spirit_MR4 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Imaginative involvement`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)
r105_spirit_MR5 <- lmer(Score ~ Scale * `Sensed presence`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r108_spirit_MR5 <- lmer(Score ~ Scale * Country * `Sensed presence`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r109_spirit_MR5 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Sensed presence`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r110_spirit_MR5 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Sensed presence`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r111_spirit_MR5 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Sensed presence`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r112_spirit_MR5 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Sensed presence`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)
r105_spirit_MR6 <- lmer(Score ~ Scale * `Altered states of consciousness (b)`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r108_spirit_MR6 <- lmer(Score ~ Scale * Country * `Altered states of consciousness (b)`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r109_spirit_MR6 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Altered states of consciousness (b)`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r110_spirit_MR6 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Altered states of consciousness (b)`
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r111_spirit_MR6 <- lmer(Score ~ Scale * Country * `Porosity Vignettes` * `Altered states of consciousness (b)`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)

r112_spirit_MR6 <- lmer(Score ~ Scale * Country * `Porosity Scale` * `Altered states of consciousness (b)`
                        + Gender + Age
                        + (1 | subject_id),
                        control = lmerControl(optimizer = "bobyqa"),
                        data = d4_abs_subscales)
table_s40s41_subscales_MR1 <- stargazer(r105_spirit_MR1, r108_spirit_MR1, 
                                        r109_spirit_MR1, r110_spirit_MR1,
                                        r111_spirit_MR1, r112_spirit_MR1,
                                        type = "html",
                                        ci = T,
                                        report = c("vcsp"),
                                        digits = 2,
                                        digits.extra = 1000,
                                        omit.table.layout = "n",
                                        order = c("^Synesthesia$",
                                                  "^`Porosity Vignettes`$",
                                                  "^`Porosity Scale`$",
                                                  "^`Porosity Vignettes`:Synesthesia$",
                                                  "^`Porosity Scale`:Synesthesia$"),
                                        # dep.var.labels.include = F,
                                        dep.var.caption = "",
                                        single.row = T) 
cat(sub_interact_fun(table_s40s41_subscales_MR1), 
    file = "./stargazer_tables/table_s40s41_subscales_MR1.html")
htmltools::includeHTML("./stargazer_tables/table_s40s41_subscales_MR1.html")
Score
(1)(2)(3)(4)(5)(6)
Synesthesia0.13 (0.05, 0.21)0.13 (0.07, 0.19)0.08 (0.02, 0.15)0.10 (0.02, 0.18)0.07 (0.01, 0.14)0.09 (0.01, 0.17)
p = 0.002p = 0.00001p = 0.02p = 0.02p = 0.04p = 0.03
Porosity Vignettes0.24 (0.17, 0.31)0.25 (0.18, 0.32)
p = 0.00p = 0.00
Porosity Scale0.35 (0.28, 0.42)0.36 (0.28, 0.43)
p = 0.00p = 0.00
Porosity Vignettes:Synesthesia-0.002 (-0.07, 0.07)0.01 (-0.06, 0.08)
p = 0.95p = 0.85
Porosity Scale:Synesthesia-0.05 (-0.12, 0.03)-0.05 (-0.13, 0.02)
p = 0.22p = 0.19
Scale: Spiritual Events-0.001 (-0.04, 0.03)-0.001 (-0.03, 0.03)-0.02 (-0.06, 0.02)-0.01 (-0.06, 0.04)-0.02 (-0.06, 0.02)-0.005 (-0.06, 0.05)
p = 0.95p = 0.98p = 0.33p = 0.75p = 0.37p = 0.86
Country: Gh.0.83 (0.71, 0.94)0.75 (0.61, 0.88)0.63 (0.50, 0.76)0.73 (0.59, 0.86)0.60 (0.46, 0.73)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.29 (-0.40, -0.18)-0.29 (-0.40, -0.17)-0.25 (-0.36, -0.13)-0.29 (-0.41, -0.17)-0.24 (-0.36, -0.12)
p = 0.0000003p = 0.000001p = 0.00004p = 0.000001p = 0.0002
Country: Ch.-0.86 (-0.98, -0.75)-0.67 (-0.83, -0.52)-0.54 (-0.72, -0.37)-0.65 (-0.81, -0.49)-0.53 (-0.71, -0.36)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.62 (0.51, 0.74)0.51 (0.36, 0.65)0.38 (0.19, 0.57)0.49 (0.33, 0.64)0.35 (0.16, 0.55)
p = 0.00p = 0.00p = 0.0001p = 0.00p = 0.0005
Gender: male-0.02 (-0.08, 0.03)0.01 (-0.05, 0.07)
p = 0.42p = 0.72
Age0.05 (-0.02, 0.11)0.04 (-0.02, 0.11)
p = 0.16p = 0.17
Scale: Spiritual Events × Country: Gh.-0.02 (-0.08, 0.05)-0.04 (-0.12, 0.04)-0.06 (-0.14, 0.03)-0.04 (-0.12, 0.05)-0.06 (-0.15, 0.03)
p = 0.66p = 0.37p = 0.19p = 0.37p = 0.18
Scale: Spiritual Events × Country: Th.-0.12 (-0.18, -0.05)-0.09 (-0.16, -0.02)-0.11 (-0.19, -0.03)-0.09 (-0.16, -0.02)-0.12 (-0.19, -0.04)
p = 0.0005p = 0.02p = 0.005p = 0.02p = 0.005
Scale: Spiritual Events × Country: Ch.0.20 (0.13, 0.27)0.16 (0.06, 0.26)0.12 (0.01, 0.24)0.16 (0.06, 0.26)0.12 (0.003, 0.24)
p = 0.00p = 0.002p = 0.04p = 0.002p = 0.05
Scale: Spiritual Events × Country: Va.-0.14 (-0.21, -0.07)-0.12 (-0.21, -0.03)-0.02 (-0.14, 0.11)-0.12 (-0.22, -0.02)-0.01 (-0.14, 0.13)
p = 0.0002p = 0.01p = 0.81p = 0.02p = 0.94
Scale: Spiritual Events × Porosity Vignettes0.03 (-0.01, 0.07)0.03 (-0.01, 0.08)
p = 0.20p = 0.19
Country: Gh. × Porosity Vignettes-0.12 (-0.24, -0.01)-0.13 (-0.25, -0.01)
p = 0.04p = 0.04
Country: Th. × Porosity Vignettes-0.02 (-0.15, 0.11)-0.03 (-0.16, 0.10)
p = 0.78p = 0.62
Country: Ch. × Porosity Vignettes0.08 (-0.08, 0.25)0.07 (-0.10, 0.24)
p = 0.33p = 0.43
Country: Va. × Porosity Vignettes-0.14 (-0.29, 0.02)-0.14 (-0.30, 0.02)
p = 0.08p = 0.09
Scale: Spiritual Events × Porosity Scale-0.03 (-0.07, 0.02)-0.03 (-0.08, 0.02)
p = 0.31p = 0.29
Country: Gh. × Porosity Scale-0.09 (-0.22, 0.03)-0.10 (-0.22, 0.03)
p = 0.15p = 0.14
Country: Th. × Porosity Scale-0.02 (-0.15, 0.11)-0.03 (-0.16, 0.11)
p = 0.75p = 0.68
Country: Ch. × Porosity Scale0.10 (-0.06, 0.26)0.08 (-0.08, 0.25)
p = 0.24p = 0.32
Country: Va. × Porosity Scale-0.15 (-0.32, 0.03)-0.15 (-0.33, 0.03)
p = 0.11p = 0.12
Scale: Spiritual Events:Synesthesia0.04 (0.003, 0.07)0.04 (0.01, 0.07)0.05 (0.01, 0.09)0.06 (0.01, 0.12)0.05 (0.003, 0.09)0.06 (0.01, 0.12)
p = 0.04p = 0.03p = 0.03p = 0.02p = 0.04p = 0.03
Country: Gh. × Synesthesia-0.02 (-0.13, 0.10)0.09 (-0.04, 0.22)0.03 (-0.10, 0.15)0.09 (-0.04, 0.22)0.03 (-0.10, 0.16)
p = 0.76p = 0.19p = 0.68p = 0.20p = 0.67
Country: Th. × Synesthesia-0.09 (-0.20, 0.02)-0.07 (-0.18, 0.04)-0.10 (-0.22, 0.03)-0.06 (-0.18, 0.05)-0.09 (-0.22, 0.03)
p = 0.10p = 0.20p = 0.12p = 0.26p = 0.14
Country: Ch. × Synesthesia-0.06 (-0.18, 0.05)-0.09 (-0.25, 0.06)-0.16 (-0.36, 0.03)-0.09 (-0.25, 0.06)-0.16 (-0.36, 0.03)
p = 0.27p = 0.24p = 0.11p = 0.25p = 0.11
Country: Va. × Synesthesia-0.06 (-0.18, 0.06)-0.06 (-0.20, 0.08)0.09 (-0.12, 0.30)-0.05 (-0.21, 0.10)0.10 (-0.12, 0.31)
p = 0.32p = 0.39p = 0.41p = 0.48p = 0.37
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes0.06 (-0.01, 0.14)0.06 (-0.02, 0.14)
p = 0.10p = 0.12
Scale: Spiritual Events × Country: Th. × Porosity Vignettes-0.0003 (-0.08, 0.08)-0.002 (-0.08, 0.08)
p = 1.00p = 0.97
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes-0.11 (-0.21, 0.001)-0.11 (-0.21, 0.003)
p = 0.06p = 0.06
Scale: Spiritual Events × Country: Va. × Porosity Vignettes-0.02 (-0.11, 0.08)-0.02 (-0.12, 0.08)
p = 0.74p = 0.67
Scale: Spiritual Events × Country: Gh. × Porosity Scale0.12 (0.03, 0.20)0.12 (0.03, 0.20)
p = 0.01p = 0.01
Scale: Spiritual Events × Country: Th. × Porosity Scale0.02 (-0.07, 0.10)0.02 (-0.07, 0.11)
p = 0.74p = 0.73
Scale: Spiritual Events × Country: Ch. × Porosity Scale-0.07 (-0.18, 0.04)-0.06 (-0.18, 0.05)
p = 0.22p = 0.26
Scale: Spiritual Events × Country: Va. × Porosity Scale-0.09 (-0.21, 0.02)-0.10 (-0.22, 0.02)
p = 0.13p = 0.10
Scale: Spiritual Events × Country: Gh. × Synesthesia0.04 (-0.03, 0.10)0.03 (-0.05, 0.12)0.03 (-0.05, 0.12)0.04 (-0.05, 0.12)0.03 (-0.05, 0.12)
p = 0.32p = 0.44p = 0.48p = 0.42p = 0.48
Scale: Spiritual Events × Country: Th. × Synesthesia-0.04 (-0.11, 0.03)-0.06 (-0.13, 0.02)-0.05 (-0.13, 0.03)-0.05 (-0.13, 0.02)-0.05 (-0.13, 0.04)
p = 0.23p = 0.13p = 0.26p = 0.15p = 0.27
Scale: Spiritual Events × Country: Ch. × Synesthesia-0.05 (-0.12, 0.02)-0.04 (-0.14, 0.06)-0.03 (-0.16, 0.10)-0.04 (-0.14, 0.06)-0.03 (-0.16, 0.11)
p = 0.15p = 0.45p = 0.68p = 0.48p = 0.70
Scale: Spiritual Events × Country: Va. × Synesthesia-0.03 (-0.10, 0.04)0.003 (-0.09, 0.09)-0.02 (-0.16, 0.12)-0.003 (-0.10, 0.09)-0.03 (-0.18, 0.11)
p = 0.42p = 0.96p = 0.77p = 0.95p = 0.67
Scale: Spiritual Events × Porosity Vignettes:Synesthesia-0.01 (-0.05, 0.04)-0.005 (-0.05, 0.04)
p = 0.75p = 0.84
Country: Gh. × Porosity Vignettes:Synesthesia-0.14 (-0.26, -0.02)-0.14 (-0.27, -0.02)
p = 0.03p = 0.03
Country: Th. × Porosity Vignettes:Synesthesia0.01 (-0.12, 0.14)-0.002 (-0.14, 0.13)
p = 0.88p = 0.98
Country: Ch. × Porosity Vignettes:Synesthesia-0.07 (-0.24, 0.09)-0.09 (-0.26, 0.08)
p = 0.39p = 0.29
Country: Va. × Porosity Vignettes:Synesthesia0.08 (-0.08, 0.23)0.08 (-0.09, 0.24)
p = 0.32p = 0.38
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes:Synesthesia-0.04 (-0.12, 0.04)-0.04 (-0.12, 0.04)
p = 0.32p = 0.30
Scale: Spiritual Events × Country: Th. × Porosity Vignettes:Synesthesia-0.01 (-0.09, 0.08)-0.01 (-0.10, 0.07)
p = 0.83p = 0.79
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes:Synesthesia0.03 (-0.07, 0.14)0.03 (-0.08, 0.14)
p = 0.57p = 0.60
Scale: Spiritual Events × Country: Va. × Porosity Vignettes:Synesthesia-0.06 (-0.16, 0.03)-0.06 (-0.16, 0.05)
p = 0.21p = 0.30
Scale: Spiritual Events × Porosity Scale:Synesthesia0.01 (-0.04, 0.06)0.01 (-0.04, 0.07)
p = 0.66p = 0.60
Country: Gh. × Porosity Scale:Synesthesia-0.002 (-0.13, 0.12)-0.003 (-0.13, 0.12)
p = 0.99p = 0.97
Country: Th. × Porosity Scale:Synesthesia-0.03 (-0.18, 0.11)-0.03 (-0.17, 0.12)
p = 0.65p = 0.72
Country: Ch. × Porosity Scale:Synesthesia0.02 (-0.16, 0.19)0.01 (-0.17, 0.18)
p = 0.85p = 0.93
Country: Va. × Porosity Scale:Synesthesia-0.08 (-0.27, 0.11)-0.08 (-0.27, 0.11)
p = 0.39p = 0.43
Scale: Spiritual Events × Country: Gh. × Porosity Scale:Synesthesia-0.06 (-0.15, 0.02)-0.07 (-0.15, 0.02)
p = 0.14p = 0.13
Scale: Spiritual Events × Country: Th. × Porosity Scale:Synesthesia0.03 (-0.06, 0.13)0.03 (-0.07, 0.13)
p = 0.51p = 0.55
Scale: Spiritual Events × Country: Ch. × Porosity Scale:Synesthesia0.02 (-0.10, 0.13)0.02 (-0.10, 0.13)
p = 0.77p = 0.79
Scale: Spiritual Events × Country: Va. × Porosity Scale:Synesthesia-0.04 (-0.16, 0.09)-0.03 (-0.16, 0.10)
p = 0.57p = 0.63
Constant-0.001 (-0.08, 0.08)0.02 (-0.04, 0.07)0.06 (-0.004, 0.13)0.07 (-0.003, 0.15)0.05 (-0.01, 0.12)0.08 (0.0002, 0.15)
p = 0.98p = 0.57p = 0.07p = 0.06p = 0.13p = 0.05
Observations1,0081,0081,0081,008978978
Log Likelihood-1,283.45-1,119.01-1,111.12-1,091.12-1,088.93-1,072.40
Akaike Inf. Crit.2,578.912,282.022,306.242,266.242,265.862,232.79
Bayesian Inf. Crit.2,608.402,390.172,512.702,472.702,480.822,447.75
table_s40s41_subscales_MR2 <- stargazer(r105_spirit_MR2, r108_spirit_MR2, 
                                        r109_spirit_MR2, r110_spirit_MR2,
                                        r111_spirit_MR2, r112_spirit_MR2,
                                        type = "html",
                                        ci = T,
                                        report = c("vcsp"),
                                        digits = 2,
                                        digits.extra = 1000,
                                        omit.table.layout = "n",
                                        order = c("^`Aesthetic involvement in nature`$",
                                                  "^`Porosity Vignettes`$",
                                                  "^`Porosity Scale`$",
                                                  "^`Porosity Vignettes`:`Aesthetic involvement in nature`$",
                                                  "^`Porosity Scale`:`Aesthetic involvement in nature`$"),
                                        # dep.var.labels.include = F,
                                        dep.var.caption = "",
                                        single.row = T) 
cat(sub_interact_fun(table_s40s41_subscales_MR2), 
    file = "./stargazer_tables/table_s40s41_subscales_MR2.html")
htmltools::includeHTML("./stargazer_tables/table_s40s41_subscales_MR2.html")
Score
(1)(2)(3)(4)(5)(6)
Aesthetic involvement in nature0.05 (-0.03, 0.13)0.05 (-0.01, 0.11)0.02 (-0.05, 0.09)0.001 (-0.08, 0.08)0.02 (-0.05, 0.09)-0.003 (-0.08, 0.07)
p = 0.19p = 0.09p = 0.62p = 0.98p = 0.65p = 0.95
Porosity Vignettes0.27 (0.20, 0.33)0.27 (0.20, 0.34)
p = 0.00p = 0.00
Porosity Scale0.36 (0.29, 0.43)0.37 (0.30, 0.44)
p = 0.00p = 0.00
Porosity Vignettes:Aesthetic involvement in nature-0.08 (-0.15, -0.005)-0.07 (-0.14, 0.005)
p = 0.04p = 0.07
Porosity Scale:Aesthetic involvement in nature-0.001 (-0.08, 0.08)-0.001 (-0.08, 0.08)
p = 0.98p = 0.99
Scale: Spiritual Events-0.001 (-0.04, 0.03)-0.001 (-0.03, 0.03)-0.02 (-0.06, 0.02)-0.005 (-0.05, 0.04)-0.02 (-0.06, 0.03)-0.002 (-0.05, 0.05)
p = 0.94p = 0.98p = 0.40p = 0.85p = 0.44p = 0.96
Country: Gh.0.83 (0.71, 0.94)0.69 (0.56, 0.81)0.62 (0.49, 0.75)0.66 (0.53, 0.79)0.59 (0.45, 0.72)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.29 (-0.40, -0.17)-0.29 (-0.40, -0.18)-0.25 (-0.36, -0.13)-0.29 (-0.40, -0.17)-0.23 (-0.36, -0.11)
p = 0.000001p = 0.0000005p = 0.00004p = 0.000002p = 0.0002
Country: Ch.-0.86 (-0.98, -0.74)-0.68 (-0.84, -0.53)-0.57 (-0.73, -0.40)-0.66 (-0.82, -0.51)-0.56 (-0.72, -0.39)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.62 (0.50, 0.74)0.50 (0.36, 0.65)0.37 (0.17, 0.56)0.48 (0.32, 0.64)0.34 (0.14, 0.54)
p = 0.00p = 0.00p = 0.0003p = 0.00p = 0.001
Gender: male-0.01 (-0.07, 0.05)0.02 (-0.03, 0.08)
p = 0.85p = 0.42
Age0.05 (-0.01, 0.12)0.04 (-0.02, 0.11)
p = 0.12p = 0.18
Scale: Spiritual Events × Country: Gh.-0.02 (-0.08, 0.05)-0.06 (-0.14, 0.02)-0.07 (-0.16, 0.01)-0.06 (-0.15, 0.02)-0.07 (-0.16, 0.01)
p = 0.66p = 0.13p = 0.11p = 0.13p = 0.10
Scale: Spiritual Events × Country: Th.-0.12 (-0.18, -0.05)-0.09 (-0.16, -0.02)-0.12 (-0.20, -0.04)-0.09 (-0.17, -0.02)-0.13 (-0.20, -0.05)
p = 0.001p = 0.02p = 0.003p = 0.02p = 0.002
Scale: Spiritual Events × Country: Ch.0.20 (0.13, 0.27)0.16 (0.06, 0.26)0.13 (0.02, 0.23)0.16 (0.06, 0.26)0.12 (0.01, 0.23)
p = 0.00p = 0.002p = 0.03p = 0.002p = 0.03
Scale: Spiritual Events × Country: Va.-0.14 (-0.21, -0.07)-0.12 (-0.21, -0.03)-0.02 (-0.15, 0.11)-0.12 (-0.22, -0.02)-0.01 (-0.14, 0.12)
p = 0.0002p = 0.01p = 0.77p = 0.02p = 0.90
Scale: Spiritual Events × Porosity Vignettes0.04 (-0.004, 0.08)0.04 (-0.003, 0.09)
p = 0.08p = 0.07
Country: Gh. × Porosity Vignettes-0.11 (-0.23, 0.004)-0.12 (-0.23, 0.001)
p = 0.06p = 0.06
Country: Th. × Porosity Vignettes-0.05 (-0.17, 0.08)-0.06 (-0.18, 0.07)
p = 0.47p = 0.37
Country: Ch. × Porosity Vignettes0.06 (-0.11, 0.23)0.05 (-0.12, 0.22)
p = 0.47p = 0.57
Country: Va. × Porosity Vignettes-0.15 (-0.30, 0.001)-0.15 (-0.31, 0.01)
p = 0.06p = 0.07
Scale: Spiritual Events × Porosity Scale-0.01 (-0.06, 0.03)-0.02 (-0.06, 0.03)
p = 0.58p = 0.55
Country: Gh. × Porosity Scale-0.09 (-0.22, 0.04)-0.09 (-0.22, 0.03)
p = 0.16p = 0.15
Country: Th. × Porosity Scale-0.05 (-0.18, 0.09)-0.05 (-0.19, 0.08)
p = 0.49p = 0.44
Country: Ch. × Porosity Scale0.07 (-0.09, 0.22)0.06 (-0.10, 0.21)
p = 0.41p = 0.49
Country: Va. × Porosity Scale-0.15 (-0.33, 0.03)-0.15 (-0.33, 0.04)
p = 0.10p = 0.12
Scale: Spiritual Events:Aesthetic involvement in nature0.02 (-0.02, 0.06)0.02 (-0.01, 0.05)0.03 (-0.01, 0.08)0.04 (-0.01, 0.09)0.03 (-0.01, 0.08)0.03 (-0.02, 0.09)
p = 0.29p = 0.25p = 0.15p = 0.16p = 0.16p = 0.19
Country: Gh. × Aesthetic involvement in nature-0.03 (-0.15, 0.09)0.03 (-0.09, 0.16)0.03 (-0.10, 0.16)0.03 (-0.09, 0.16)0.03 (-0.10, 0.16)
p = 0.62p = 0.61p = 0.69p = 0.64p = 0.68
Country: Th. × Aesthetic involvement in nature0.10 (-0.01, 0.22)0.12 (0.01, 0.23)0.11 (-0.01, 0.23)0.12 (0.01, 0.24)0.12 (0.01, 0.24)
p = 0.08p = 0.05p = 0.07p = 0.04p = 0.05
Country: Ch. × Aesthetic involvement in nature-0.03 (-0.15, 0.09)-0.05 (-0.22, 0.12)-0.02 (-0.20, 0.15)-0.05 (-0.22, 0.12)-0.02 (-0.20, 0.15)
p = 0.63p = 0.56p = 0.82p = 0.56p = 0.80
Country: Va. × Aesthetic involvement in nature-0.08 (-0.20, 0.04)-0.01 (-0.17, 0.15)-0.11 (-0.31, 0.09)-0.02 (-0.19, 0.14)-0.13 (-0.33, 0.08)
p = 0.21p = 0.90p = 0.29p = 0.79p = 0.23
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes0.07 (-0.003, 0.14)0.07 (-0.01, 0.14)
p = 0.07p = 0.08
Scale: Spiritual Events × Country: Th. × Porosity Vignettes-0.01 (-0.09, 0.07)-0.01 (-0.09, 0.07)
p = 0.83p = 0.79
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes-0.11 (-0.22, -0.01)-0.11 (-0.22, -0.01)
p = 0.04p = 0.04
Scale: Spiritual Events × Country: Va. × Porosity Vignettes-0.03 (-0.13, 0.07)-0.03 (-0.13, 0.07)
p = 0.55p = 0.56
Scale: Spiritual Events × Country: Gh. × Porosity Scale0.12 (0.04, 0.20)0.12 (0.04, 0.21)
p = 0.01p = 0.01
Scale: Spiritual Events × Country: Th. × Porosity Scale0.01 (-0.08, 0.10)0.01 (-0.08, 0.10)
p = 0.87p = 0.86
Scale: Spiritual Events × Country: Ch. × Porosity Scale-0.08 (-0.18, 0.03)-0.07 (-0.18, 0.03)
p = 0.15p = 0.17
Scale: Spiritual Events × Country: Va. × Porosity Scale-0.11 (-0.22, 0.01)-0.12 (-0.24, 0.01)
p = 0.08p = 0.07
Scale: Spiritual Events × Country: Gh. × Aesthetic involvement in nature0.03 (-0.04, 0.10)0.02 (-0.06, 0.10)0.03 (-0.05, 0.12)0.02 (-0.06, 0.10)0.03 (-0.05, 0.12)
p = 0.39p = 0.57p = 0.48p = 0.57p = 0.45
Scale: Spiritual Events × Country: Th. × Aesthetic involvement in nature-0.03 (-0.10, 0.03)-0.04 (-0.11, 0.03)-0.04 (-0.11, 0.04)-0.04 (-0.11, 0.03)-0.03 (-0.11, 0.05)
p = 0.32p = 0.26p = 0.38p = 0.28p = 0.43
Scale: Spiritual Events × Country: Ch. × Aesthetic involvement in nature0.003 (-0.07, 0.07)0.004 (-0.10, 0.11)0.03 (-0.09, 0.14)0.004 (-0.10, 0.11)0.03 (-0.09, 0.14)
p = 0.95p = 0.95p = 0.67p = 0.95p = 0.66
Scale: Spiritual Events × Country: Va. × Aesthetic involvement in nature-0.03 (-0.10, 0.05)0.02 (-0.08, 0.12)-0.03 (-0.16, 0.10)0.02 (-0.09, 0.13)-0.04 (-0.17, 0.10)
p = 0.49p = 0.70p = 0.67p = 0.76p = 0.57
Scale: Spiritual Events × Porosity Vignettes:Aesthetic involvement in nature-0.004 (-0.05, 0.04)-0.004 (-0.05, 0.04)
p = 0.86p = 0.87
Country: Gh. × Porosity Vignettes:Aesthetic involvement in nature0.01 (-0.11, 0.13)0.004 (-0.12, 0.12)
p = 0.90p = 0.96
Country: Th. × Porosity Vignettes:Aesthetic involvement in nature-0.001 (-0.13, 0.13)-0.01 (-0.14, 0.12)
p = 1.00p = 0.88
Country: Ch. × Porosity Vignettes:Aesthetic involvement in nature-0.01 (-0.20, 0.17)-0.02 (-0.20, 0.16)
p = 0.88p = 0.83
Country: Va. × Porosity Vignettes:Aesthetic involvement in nature0.02 (-0.14, 0.19)0.02 (-0.15, 0.18)
p = 0.77p = 0.86
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes:Aesthetic involvement in nature-0.01 (-0.09, 0.06)-0.01 (-0.09, 0.07)
p = 0.76p = 0.77
Scale: Spiritual Events × Country: Th. × Porosity Vignettes:Aesthetic involvement in nature0.05 (-0.04, 0.13)0.05 (-0.04, 0.13)
p = 0.28p = 0.29
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes:Aesthetic involvement in nature0.03 (-0.09, 0.14)0.03 (-0.09, 0.14)
p = 0.66p = 0.67
Scale: Spiritual Events × Country: Va. × Porosity Vignettes:Aesthetic involvement in nature-0.08 (-0.18, 0.03)-0.08 (-0.18, 0.03)
p = 0.15p = 0.17
Scale: Spiritual Events × Porosity Scale:Aesthetic involvement in nature0.02 (-0.03, 0.07)0.02 (-0.03, 0.07)
p = 0.54p = 0.49
Country: Gh. × Porosity Scale:Aesthetic involvement in nature0.01 (-0.12, 0.14)0.01 (-0.12, 0.14)
p = 0.84p = 0.89
Country: Th. × Porosity Scale:Aesthetic involvement in nature-0.02 (-0.16, 0.12)-0.02 (-0.17, 0.12)
p = 0.78p = 0.75
Country: Ch. × Porosity Scale:Aesthetic involvement in nature-0.01 (-0.18, 0.15)-0.02 (-0.19, 0.14)
p = 0.87p = 0.78
Country: Va. × Porosity Scale:Aesthetic involvement in nature0.09 (-0.11, 0.29)0.10 (-0.11, 0.30)
p = 0.39p = 0.36
Scale: Spiritual Events × Country: Gh. × Porosity Scale:Aesthetic involvement in nature-0.04 (-0.12, 0.05)-0.04 (-0.13, 0.05)
p = 0.39p = 0.37
Scale: Spiritual Events × Country: Th. × Porosity Scale:Aesthetic involvement in nature0.05 (-0.04, 0.15)0.05 (-0.05, 0.14)
p = 0.27p = 0.31
Scale: Spiritual Events × Country: Ch. × Porosity Scale:Aesthetic involvement in nature0.02 (-0.09, 0.13)0.02 (-0.09, 0.13)
p = 0.71p = 0.76
Scale: Spiritual Events × Country: Va. × Porosity Scale:Aesthetic involvement in nature-0.03 (-0.16, 0.11)-0.02 (-0.15, 0.12)
p = 0.71p = 0.83
Constant-0.001 (-0.08, 0.08)0.02 (-0.04, 0.07)0.07 (0.002, 0.13)0.07 (-0.003, 0.14)0.06 (-0.004, 0.13)0.08 (0.0005, 0.15)
p = 0.98p = 0.58p = 0.05p = 0.07p = 0.07p = 0.05
Observations1,0081,0081,0081,008978978
Log Likelihood-1,289.22-1,138.31-1,119.25-1,105.08-1,097.45-1,084.56
Akaike Inf. Crit.2,590.442,320.622,322.502,294.162,282.892,257.11
Bayesian Inf. Crit.2,619.932,428.772,528.962,500.622,497.862,472.08
table_s40s41_subscales_MR3 <- stargazer(r105_spirit_MR3, r108_spirit_MR3, 
                                        r109_spirit_MR3, r110_spirit_MR3,
                                        r111_spirit_MR3, r112_spirit_MR3,
                                        type = "html",
                                        ci = T,
                                        report = c("vcsp"),
                                        digits = 2,
                                        digits.extra = 1000,
                                        omit.table.layout = "n",
                                        order = c("^`Altered states of consciousness \\(a\\)`$",
                                                  "^`Porosity Vignettes`$",
                                                  "^`Porosity Scale`$",
                                                  "^`Porosity Vignettes`:`Altered states of consciousness \\(a\\)`$",
                                                  "^`Porosity Scale`:`Altered states of consciousness \\(a\\)`$"),
                                        # dep.var.labels.include = F,
                                        dep.var.caption = "",
                                        single.row = T) 
cat(sub_interact_fun(table_s40s41_subscales_MR3), 
    file = "./stargazer_tables/table_s40s41_subscales_MR3.html")
htmltools::includeHTML("./stargazer_tables/table_s40s41_subscales_MR3.html")
Score
(1)(2)(3)(4)(5)(6)
Altered states of consciousness (a)0.11 (0.03, 0.19)0.10 (0.04, 0.16)0.07 (0.001, 0.15)0.07 (-0.01, 0.14)0.07 (-0.002, 0.15)0.07 (-0.01, 0.14)
p = 0.01p = 0.001p = 0.05p = 0.09p = 0.06p = 0.10
Porosity Vignettes0.25 (0.18, 0.32)0.25 (0.18, 0.32)
p = 0.00p = 0.00
Porosity Scale0.35 (0.28, 0.42)0.36 (0.29, 0.43)
p = 0.00p = 0.00
Porosity Vignettes:Altered states of consciousness (a)-0.04 (-0.12, 0.03)-0.03 (-0.11, 0.04)
p = 0.27p = 0.39
Porosity Scale:Altered states of consciousness (a)0.01 (-0.06, 0.09)0.02 (-0.06, 0.09)
p = 0.71p = 0.63
Scale: Spiritual Events-0.002 (-0.04, 0.03)-0.001 (-0.04, 0.03)-0.01 (-0.06, 0.03)-0.01 (-0.06, 0.04)-0.01 (-0.05, 0.03)-0.004 (-0.05, 0.05)
p = 0.94p = 0.97p = 0.59p = 0.78p = 0.66p = 0.89
Country: Gh.0.83 (0.71, 0.94)0.70 (0.57, 0.83)0.63 (0.50, 0.76)0.68 (0.54, 0.81)0.60 (0.46, 0.74)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.29 (-0.40, -0.17)-0.32 (-0.44, -0.20)-0.26 (-0.37, -0.14)-0.32 (-0.45, -0.20)-0.24 (-0.37, -0.12)
p = 0.000001p = 0.0000002p = 0.00002p = 0.0000005p = 0.0002
Country: Ch.-0.86 (-0.98, -0.75)-0.68 (-0.84, -0.52)-0.58 (-0.74, -0.42)-0.66 (-0.82, -0.50)-0.57 (-0.74, -0.41)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.62 (0.50, 0.74)0.51 (0.36, 0.66)0.39 (0.19, 0.58)0.49 (0.33, 0.66)0.36 (0.15, 0.56)
p = 0.00p = 0.00p = 0.0002p = 0.00p = 0.001
Gender: male-0.01 (-0.07, 0.04)0.02 (-0.03, 0.08)
p = 0.63p = 0.41
Age0.05 (-0.02, 0.11)0.04 (-0.02, 0.11)
p = 0.16p = 0.21
Scale: Spiritual Events × Country: Gh.-0.02 (-0.08, 0.05)-0.06 (-0.14, 0.02)-0.07 (-0.16, 0.01)-0.06 (-0.15, 0.02)-0.08 (-0.17, 0.01)
p = 0.65p = 0.15p = 0.11p = 0.14p = 0.10
Scale: Spiritual Events × Country: Th.-0.12 (-0.18, -0.05)-0.09 (-0.17, -0.02)-0.12 (-0.20, -0.04)-0.10 (-0.17, -0.02)-0.12 (-0.20, -0.04)
p = 0.001p = 0.02p = 0.004p = 0.02p = 0.003
Scale: Spiritual Events × Country: Ch.0.20 (0.13, 0.27)0.16 (0.06, 0.26)0.12 (0.01, 0.23)0.16 (0.05, 0.26)0.12 (0.01, 0.23)
p = 0.00000002p = 0.002p = 0.04p = 0.003p = 0.04
Scale: Spiritual Events × Country: Va.-0.14 (-0.21, -0.07)-0.11 (-0.21, -0.02)-0.02 (-0.15, 0.11)-0.11 (-0.21, -0.01)-0.01 (-0.15, 0.13)
p = 0.0002p = 0.03p = 0.75p = 0.04p = 0.90
Scale: Spiritual Events × Porosity Vignettes0.04 (-0.003, 0.09)0.04 (-0.003, 0.09)
p = 0.07p = 0.07
Country: Gh. × Porosity Vignettes-0.09 (-0.21, 0.02)-0.10 (-0.22, 0.02)
p = 0.12p = 0.11
Country: Th. × Porosity Vignettes-0.09 (-0.22, 0.05)-0.10 (-0.24, 0.04)
p = 0.21p = 0.16
Country: Ch. × Porosity Vignettes0.08 (-0.09, 0.25)0.07 (-0.10, 0.24)
p = 0.34p = 0.42
Country: Va. × Porosity Vignettes-0.15 (-0.31, 0.01)-0.15 (-0.31, 0.01)
p = 0.07p = 0.08
Scale: Spiritual Events × Porosity Scale-0.02 (-0.07, 0.03)-0.02 (-0.07, 0.03)
p = 0.49p = 0.44
Country: Gh. × Porosity Scale-0.08 (-0.21, 0.04)-0.09 (-0.22, 0.04)
p = 0.20p = 0.18
Country: Th. × Porosity Scale-0.04 (-0.18, 0.09)-0.05 (-0.18, 0.09)
p = 0.52p = 0.48
Country: Ch. × Porosity Scale0.06 (-0.09, 0.22)0.05 (-0.11, 0.21)
p = 0.44p = 0.54
Country: Va. × Porosity Scale-0.16 (-0.34, 0.02)-0.15 (-0.33, 0.03)
p = 0.09p = 0.11
Scale: Spiritual Events:Altered states of consciousness (a)0.01 (-0.03, 0.05)0.01 (-0.02, 0.04)0.02 (-0.03, 0.06)0.01 (-0.04, 0.06)0.02 (-0.03, 0.06)0.01 (-0.04, 0.06)
p = 0.58p = 0.59p = 0.49p = 0.67p = 0.52p = 0.67
Country: Gh. × Altered states of consciousness (a)-0.05 (-0.17, 0.07)0.04 (-0.09, 0.18)-0.03 (-0.16, 0.11)0.04 (-0.09, 0.18)-0.02 (-0.16, 0.11)
p = 0.39p = 0.55p = 0.69p = 0.54p = 0.75
Country: Th. × Altered states of consciousness (a)0.07 (-0.04, 0.19)0.10 (-0.04, 0.23)0.11 (-0.02, 0.23)0.10 (-0.04, 0.24)0.11 (-0.01, 0.23)
p = 0.19p = 0.17p = 0.10p = 0.16p = 0.08
Country: Ch. × Altered states of consciousness (a)-0.03 (-0.15, 0.09)-0.03 (-0.21, 0.16)0.02 (-0.17, 0.20)-0.03 (-0.22, 0.16)0.02 (-0.17, 0.21)
p = 0.63p = 0.79p = 0.88p = 0.74p = 0.83
Country: Va. × Altered states of consciousness (a)-0.04 (-0.16, 0.08)-0.02 (-0.16, 0.13)-0.07 (-0.25, 0.12)-0.02 (-0.17, 0.12)-0.07 (-0.26, 0.11)
p = 0.56p = 0.84p = 0.49p = 0.76p = 0.45
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes0.07 (-0.003, 0.15)0.07 (-0.01, 0.15)
p = 0.06p = 0.07
Scale: Spiritual Events × Country: Th. × Porosity Vignettes-0.002 (-0.09, 0.08)-0.003 (-0.09, 0.08)
p = 0.97p = 0.95
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes-0.11 (-0.22, -0.005)-0.11 (-0.22, -0.003)
p = 0.05p = 0.05
Scale: Spiritual Events × Country: Va. × Porosity Vignettes-0.04 (-0.14, 0.06)-0.05 (-0.15, 0.06)
p = 0.41p = 0.36
Scale: Spiritual Events × Country: Gh. × Porosity Scale0.12 (0.03, 0.20)0.12 (0.03, 0.21)
p = 0.01p = 0.01
Scale: Spiritual Events × Country: Th. × Porosity Scale-0.001 (-0.09, 0.09)0.00002 (-0.09, 0.09)
p = 0.99p = 1.00
Scale: Spiritual Events × Country: Ch. × Porosity Scale-0.08 (-0.18, 0.02)-0.08 (-0.18, 0.03)
p = 0.13p = 0.16
Scale: Spiritual Events × Country: Va. × Porosity Scale-0.10 (-0.22, 0.02)-0.11 (-0.23, 0.01)
p = 0.11p = 0.09
Scale: Spiritual Events × Country: Gh. × Altered states of consciousness (a)0.004 (-0.07, 0.07)0.05 (-0.04, 0.13)-0.04 (-0.13, 0.05)0.05 (-0.04, 0.13)-0.04 (-0.13, 0.06)
p = 0.93p = 0.30p = 0.44p = 0.30p = 0.45
Scale: Spiritual Events × Country: Th. × Altered states of consciousness (a)-0.01 (-0.08, 0.06)-0.03 (-0.12, 0.05)0.003 (-0.08, 0.09)-0.03 (-0.12, 0.06)0.003 (-0.08, 0.09)
p = 0.75p = 0.47p = 0.94p = 0.48p = 0.96
Scale: Spiritual Events × Country: Ch. × Altered states of consciousness (a)0.02 (-0.05, 0.09)-0.02 (-0.14, 0.10)0.06 (-0.06, 0.19)-0.02 (-0.14, 0.10)0.06 (-0.06, 0.19)
p = 0.62p = 0.72p = 0.33p = 0.73p = 0.34
Scale: Spiritual Events × Country: Va. × Altered states of consciousness (a)-0.02 (-0.09, 0.05)0.02 (-0.07, 0.11)-0.03 (-0.15, 0.10)0.01 (-0.08, 0.11)-0.02 (-0.15, 0.10)
p = 0.56p = 0.73p = 0.68p = 0.78p = 0.71
Scale: Spiritual Events × Porosity Vignettes:Altered states of consciousness (a)-0.04 (-0.09, 0.01)-0.04 (-0.09, 0.01)
p = 0.09p = 0.11
Country: Gh. × Porosity Vignettes:Altered states of consciousness (a)-0.08 (-0.21, 0.04)-0.08 (-0.20, 0.05)
p = 0.19p = 0.22
Country: Th. × Porosity Vignettes:Altered states of consciousness (a)0.11 (-0.05, 0.27)0.11 (-0.06, 0.27)
p = 0.18p = 0.21
Country: Ch. × Porosity Vignettes:Altered states of consciousness (a)0.03 (-0.17, 0.22)0.003 (-0.20, 0.20)
p = 0.80p = 0.98
Country: Va. × Porosity Vignettes:Altered states of consciousness (a)0.03 (-0.12, 0.18)0.03 (-0.12, 0.19)
p = 0.72p = 0.68
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes:Altered states of consciousness (a)-0.05 (-0.13, 0.03)-0.05 (-0.13, 0.03)
p = 0.19p = 0.19
Scale: Spiritual Events × Country: Th. × Porosity Vignettes:Altered states of consciousness (a)0.03 (-0.07, 0.13)0.03 (-0.07, 0.13)
p = 0.57p = 0.59
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes:Altered states of consciousness (a)-0.002 (-0.13, 0.12)-0.003 (-0.13, 0.12)
p = 0.98p = 0.97
Scale: Spiritual Events × Country: Va. × Porosity Vignettes:Altered states of consciousness (a)-0.04 (-0.14, 0.05)-0.04 (-0.14, 0.06)
p = 0.37p = 0.43
Scale: Spiritual Events × Porosity Scale:Altered states of consciousness (a)0.02 (-0.03, 0.07)0.02 (-0.03, 0.07)
p = 0.38p = 0.39
Country: Gh. × Porosity Scale:Altered states of consciousness (a)-0.07 (-0.21, 0.08)-0.06 (-0.20, 0.09)
p = 0.37p = 0.44
Country: Th. × Porosity Scale:Altered states of consciousness (a)0.06 (-0.08, 0.20)0.06 (-0.08, 0.20)
p = 0.38p = 0.41
Country: Ch. × Porosity Scale:Altered states of consciousness (a)0.04 (-0.13, 0.21)0.04 (-0.14, 0.21)
p = 0.64p = 0.68
Country: Va. × Porosity Scale:Altered states of consciousness (a)0.04 (-0.12, 0.20)0.04 (-0.12, 0.20)
p = 0.63p = 0.64
Scale: Spiritual Events × Country: Gh. × Porosity Scale:Altered states of consciousness (a)0.02 (-0.08, 0.12)0.02 (-0.08, 0.12)
p = 0.68p = 0.69
Scale: Spiritual Events × Country: Th. × Porosity Scale:Altered states of consciousness (a)0.01 (-0.08, 0.11)0.02 (-0.08, 0.11)
p = 0.76p = 0.72
Scale: Spiritual Events × Country: Ch. × Porosity Scale:Altered states of consciousness (a)0.02 (-0.10, 0.13)0.02 (-0.10, 0.14)
p = 0.78p = 0.77
Scale: Spiritual Events × Country: Va. × Porosity Scale:Altered states of consciousness (a)-0.01 (-0.12, 0.10)-0.01 (-0.12, 0.10)
p = 0.85p = 0.81
Constant-0.002 (-0.08, 0.08)0.02 (-0.04, 0.07)0.07 (0.001, 0.14)0.07 (-0.01, 0.14)0.06 (-0.01, 0.13)0.07 (-0.003, 0.15)
p = 0.97p = 0.58p = 0.05p = 0.08p = 0.08p = 0.07
Observations1,0081,0081,0081,008978978
Log Likelihood-1,287.18-1,135.96-1,114.60-1,104.26-1,093.86-1,084.20
Akaike Inf. Crit.2,586.372,315.932,313.202,292.532,275.722,256.40
Bayesian Inf. Crit.2,615.862,424.072,519.662,498.992,490.682,471.37
table_s40s41_subscales_MR4 <- stargazer(r105_spirit_MR4, r108_spirit_MR4, 
                                        r109_spirit_MR4, r110_spirit_MR4,
                                        r111_spirit_MR4, r112_spirit_MR4,
                                        type = "html",
                                        ci = T,
                                        report = c("vcsp"),
                                        digits = 2,
                                        digits.extra = 1000,
                                        omit.table.layout = "n",
                                        order = c("^`Imaginative involvement`$",
                                                  "^`Porosity Vignettes`$",
                                                  "^`Porosity Scale`$",
                                                  "^`Porosity Vignettes`:`Imaginative involvement`$",
                                                  "^`Porosity Scale`:`Imaginative involvement`$"),
                                        # dep.var.labels.include = F,
                                        dep.var.caption = "",
                                        single.row = T) 
cat(sub_interact_fun(table_s40s41_subscales_MR4), 
    file = "./stargazer_tables/table_s40s41_subscales_MR4.html")
htmltools::includeHTML("./stargazer_tables/table_s40s41_subscales_MR4.html")
Score
(1)(2)(3)(4)(5)(6)
Imaginative involvement0.09 (0.01, 0.17)0.09 (0.03, 0.15)0.08 (0.01, 0.14)0.05 (-0.02, 0.12)0.08 (0.01, 0.14)0.05 (-0.03, 0.13)
p = 0.03p = 0.004p = 0.02p = 0.19p = 0.03p = 0.23
Porosity Vignettes0.26 (0.19, 0.33)0.26 (0.19, 0.33)
p = 0.00p = 0.00
Porosity Scale0.36 (0.28, 0.43)0.36 (0.29, 0.44)
p = 0.00p = 0.00
Porosity Vignettes:Imaginative involvement0.01 (-0.06, 0.08)0.01 (-0.06, 0.09)
p = 0.81p = 0.75
Porosity Scale:Imaginative involvement0.06 (-0.02, 0.13)0.06 (-0.01, 0.14)
p = 0.13p = 0.10
Scale: Spiritual Events-0.002 (-0.04, 0.03)-0.0005 (-0.03, 0.03)-0.02 (-0.06, 0.02)-0.01 (-0.05, 0.04)-0.02 (-0.06, 0.02)-0.003 (-0.05, 0.05)
p = 0.94p = 0.98p = 0.35p = 0.84p = 0.37p = 0.91
Country: Gh.0.83 (0.71, 0.94)0.71 (0.58, 0.84)0.64 (0.51, 0.77)0.69 (0.56, 0.82)0.62 (0.48, 0.75)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.29 (-0.40, -0.17)-0.30 (-0.41, -0.19)-0.25 (-0.37, -0.13)-0.30 (-0.42, -0.19)-0.24 (-0.36, -0.12)
p = 0.000001p = 0.0000002p = 0.00003p = 0.0000003p = 0.0002
Country: Ch.-0.86 (-0.98, -0.74)-0.70 (-0.86, -0.54)-0.60 (-0.76, -0.43)-0.68 (-0.84, -0.52)-0.59 (-0.75, -0.42)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.62 (0.50, 0.74)0.51 (0.36, 0.65)0.39 (0.19, 0.58)0.48 (0.32, 0.63)0.36 (0.16, 0.56)
p = 0.00p = 0.00p = 0.0001p = 0.00p = 0.0005
Gender: male-0.02 (-0.08, 0.04)0.02 (-0.04, 0.08)
p = 0.55p = 0.51
Age0.05 (-0.02, 0.12)0.03 (-0.03, 0.10)
p = 0.14p = 0.31
Scale: Spiritual Events × Country: Gh.-0.02 (-0.08, 0.05)-0.06 (-0.14, 0.02)-0.07 (-0.16, 0.01)-0.06 (-0.14, 0.03)-0.08 (-0.16, 0.01)
p = 0.66p = 0.18p = 0.10p = 0.18p = 0.10
Scale: Spiritual Events × Country: Th.-0.12 (-0.18, -0.05)-0.09 (-0.16, -0.02)-0.11 (-0.19, -0.04)-0.09 (-0.16, -0.02)-0.12 (-0.20, -0.04)
p = 0.001p = 0.01p = 0.004p = 0.02p = 0.004
Scale: Spiritual Events × Country: Ch.0.20 (0.13, 0.27)0.15 (0.05, 0.25)0.11 (0.01, 0.22)0.15 (0.05, 0.25)0.11 (0.001, 0.22)
p = 0.00p = 0.003p = 0.04p = 0.003p = 0.05
Scale: Spiritual Events × Country: Va.-0.14 (-0.21, -0.07)-0.12 (-0.21, -0.03)-0.01 (-0.14, 0.12)-0.12 (-0.21, -0.02)-0.01 (-0.14, 0.12)
p = 0.0002p = 0.02p = 0.85p = 0.02p = 0.92
Scale: Spiritual Events × Porosity Vignettes0.04 (0.00002, 0.09)0.05 (0.002, 0.09)
p = 0.05p = 0.05
Country: Gh. × Porosity Vignettes-0.11 (-0.23, 0.01)-0.12 (-0.23, 0.004)
p = 0.07p = 0.06
Country: Th. × Porosity Vignettes-0.06 (-0.18, 0.07)-0.06 (-0.19, 0.06)
p = 0.39p = 0.32
Country: Ch. × Porosity Vignettes0.06 (-0.11, 0.22)0.04 (-0.13, 0.21)
p = 0.52p = 0.63
Country: Va. × Porosity Vignettes-0.15 (-0.30, -0.001)-0.15 (-0.31, 0.01)
p = 0.05p = 0.07
Scale: Spiritual Events × Porosity Scale-0.01 (-0.06, 0.04)-0.01 (-0.06, 0.04)
p = 0.68p = 0.64
Country: Gh. × Porosity Scale-0.08 (-0.21, 0.05)-0.09 (-0.22, 0.04)
p = 0.21p = 0.18
Country: Th. × Porosity Scale-0.02 (-0.15, 0.11)-0.03 (-0.16, 0.11)
p = 0.74p = 0.70
Country: Ch. × Porosity Scale0.04 (-0.11, 0.20)0.03 (-0.12, 0.19)
p = 0.59p = 0.68
Country: Va. × Porosity Scale-0.17 (-0.35, 0.01)-0.16 (-0.34, 0.02)
p = 0.07p = 0.08
Scale: Spiritual Events:Imaginative involvement0.004 (-0.03, 0.04)0.004 (-0.03, 0.04)0.01 (-0.03, 0.05)0.004 (-0.05, 0.05)0.01 (-0.04, 0.05)0.002 (-0.05, 0.05)
p = 0.84p = 0.83p = 0.77p = 0.89p = 0.80p = 0.95
Country: Gh. × Imaginative involvement-0.01 (-0.12, 0.11)-0.01 (-0.13, 0.11)-0.03 (-0.15, 0.09)-0.001 (-0.12, 0.12)-0.02 (-0.14, 0.11)
p = 0.91p = 0.85p = 0.67p = 0.99p = 0.78
Country: Th. × Imaginative involvement0.07 (-0.04, 0.19)0.09 (-0.02, 0.20)0.11 (-0.001, 0.23)0.09 (-0.02, 0.20)0.11 (-0.003, 0.23)
p = 0.20p = 0.13p = 0.06p = 0.13p = 0.06
Country: Ch. × Imaginative involvement0.02 (-0.10, 0.13)0.11 (-0.06, 0.27)0.12 (-0.06, 0.29)0.11 (-0.05, 0.28)0.12 (-0.06, 0.30)
p = 0.78p = 0.20p = 0.19p = 0.19p = 0.19
Country: Va. × Imaginative involvement-0.02 (-0.14, 0.10)-0.01 (-0.14, 0.12)-0.14 (-0.33, 0.06)-0.02 (-0.17, 0.12)-0.17 (-0.38, 0.04)
p = 0.79p = 0.86p = 0.17p = 0.75p = 0.13
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes0.10 (0.03, 0.18)0.10 (0.02, 0.18)
p = 0.01p = 0.01
Scale: Spiritual Events × Country: Th. × Porosity Vignettes-0.003 (-0.08, 0.07)-0.01 (-0.09, 0.07)
p = 0.95p = 0.88
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes-0.14 (-0.24, -0.03)-0.14 (-0.25, -0.03)
p = 0.02p = 0.02
Scale: Spiritual Events × Country: Va. × Porosity Vignettes-0.04 (-0.14, 0.05)-0.04 (-0.14, 0.06)
p = 0.40p = 0.42
Scale: Spiritual Events × Country: Gh. × Porosity Scale0.16 (0.07, 0.24)0.16 (0.07, 0.25)
p = 0.0004p = 0.0004
Scale: Spiritual Events × Country: Th. × Porosity Scale0.004 (-0.08, 0.09)0.003 (-0.09, 0.09)
p = 0.94p = 0.95
Scale: Spiritual Events × Country: Ch. × Porosity Scale-0.10 (-0.20, 0.01)-0.10 (-0.20, 0.01)
p = 0.07p = 0.08
Scale: Spiritual Events × Country: Va. × Porosity Scale-0.12 (-0.24, -0.003)-0.13 (-0.25, -0.01)
p = 0.05p = 0.04
Scale: Spiritual Events × Country: Gh. × Imaginative involvement-0.08 (-0.14, -0.01)-0.08 (-0.16, -0.01)-0.10 (-0.18, -0.02)-0.08 (-0.16, -0.01)-0.10 (-0.18, -0.02)
p = 0.04p = 0.03p = 0.02p = 0.04p = 0.02
Scale: Spiritual Events × Country: Th. × Imaginative involvement-0.06 (-0.12, 0.01)-0.05 (-0.12, 0.02)-0.05 (-0.13, 0.03)-0.05 (-0.12, 0.02)-0.05 (-0.13, 0.03)
p = 0.09p = 0.16p = 0.21p = 0.18p = 0.24
Scale: Spiritual Events × Country: Ch. × Imaginative involvement0.07 (0.01, 0.14)0.06 (-0.04, 0.16)0.12 (0.004, 0.24)0.06 (-0.04, 0.17)0.12 (0.004, 0.24)
p = 0.04p = 0.24p = 0.05p = 0.25p = 0.05
Scale: Spiritual Events × Country: Va. × Imaginative involvement0.04 (-0.03, 0.11)0.06 (-0.02, 0.14)0.02 (-0.11, 0.15)0.05 (-0.04, 0.14)0.01 (-0.13, 0.15)
p = 0.24p = 0.16p = 0.81p = 0.29p = 0.93
Scale: Spiritual Events × Porosity Vignettes:Imaginative involvement-0.02 (-0.06, 0.03)-0.02 (-0.06, 0.03)
p = 0.42p = 0.52
Country: Gh. × Porosity Vignettes:Imaginative involvement-0.10 (-0.22, 0.02)-0.10 (-0.22, 0.02)
p = 0.11p = 0.12
Country: Th. × Porosity Vignettes:Imaginative involvement0.09 (-0.05, 0.22)0.08 (-0.05, 0.22)
p = 0.22p = 0.24
Country: Ch. × Porosity Vignettes:Imaginative involvement0.14 (-0.04, 0.32)0.12 (-0.06, 0.31)
p = 0.14p = 0.19
Country: Va. × Porosity Vignettes:Imaginative involvement-0.01 (-0.16, 0.14)-0.01 (-0.17, 0.16)
p = 0.89p = 0.93
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes:Imaginative involvement-0.10 (-0.18, -0.02)-0.10 (-0.18, -0.03)
p = 0.01p = 0.01
Scale: Spiritual Events × Country: Th. × Porosity Vignettes:Imaginative involvement0.07 (-0.01, 0.16)0.07 (-0.02, 0.16)
p = 0.11p = 0.13
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes:Imaginative involvement-0.01 (-0.12, 0.11)-0.01 (-0.12, 0.11)
p = 0.93p = 0.90
Scale: Spiritual Events × Country: Va. × Porosity Vignettes:Imaginative involvement-0.03 (-0.12, 0.07)-0.03 (-0.13, 0.08)
p = 0.60p = 0.62
Scale: Spiritual Events × Porosity Scale:Imaginative involvement0.01 (-0.04, 0.06)0.01 (-0.04, 0.06)
p = 0.77p = 0.75
Country: Gh. × Porosity Scale:Imaginative involvement-0.13 (-0.26, -0.003)-0.12 (-0.25, 0.01)
p = 0.05p = 0.07
Country: Th. × Porosity Scale:Imaginative involvement0.05 (-0.08, 0.18)0.04 (-0.09, 0.17)
p = 0.49p = 0.54
Country: Ch. × Porosity Scale:Imaginative involvement0.05 (-0.12, 0.22)0.04 (-0.13, 0.21)
p = 0.56p = 0.66
Country: Va. × Porosity Scale:Imaginative involvement0.11 (-0.08, 0.30)0.11 (-0.08, 0.31)
p = 0.27p = 0.25
Scale: Spiritual Events × Country: Gh. × Porosity Scale:Imaginative involvement-0.08 (-0.16, 0.003)-0.08 (-0.17, 0.003)
p = 0.06p = 0.06
Scale: Spiritual Events × Country: Th. × Porosity Scale:Imaginative involvement0.02 (-0.07, 0.11)0.02 (-0.07, 0.11)
p = 0.65p = 0.64
Scale: Spiritual Events × Country: Ch. × Porosity Scale:Imaginative involvement0.04 (-0.07, 0.15)0.03 (-0.08, 0.15)
p = 0.53p = 0.55
Scale: Spiritual Events × Country: Va. × Porosity Scale:Imaginative involvement0.03 (-0.09, 0.16)0.03 (-0.10, 0.16)
p = 0.63p = 0.64
Constant-0.002 (-0.08, 0.08)0.02 (-0.04, 0.07)0.07 (0.001, 0.13)0.07 (-0.005, 0.14)0.06 (-0.01, 0.13)0.07 (-0.003, 0.15)
p = 0.97p = 0.58p = 0.05p = 0.07p = 0.09p = 0.06
Observations1,0081,0081,0081,008978978
Log Likelihood-1,288.13-1,132.79-1,105.55-1,094.29-1,083.67-1,074.74
Akaike Inf. Crit.2,588.252,309.572,295.102,272.582,255.342,237.49
Bayesian Inf. Crit.2,617.752,417.722,501.562,479.042,470.302,452.45
table_s40s41_subscales_MR5 <- stargazer(r105_spirit_MR5, r108_spirit_MR5, 
                                        r109_spirit_MR5, r110_spirit_MR5,
                                        r111_spirit_MR5, r112_spirit_MR5,
                                        type = "html",
                                        ci = T,
                                        report = c("vcsp"),
                                        digits = 2,
                                        digits.extra = 1000,
                                        omit.table.layout = "n",
                                        order = c("^`Sensed presence`$",
                                                  "^`Porosity Vignettes`$",
                                                  "^`Porosity Scale`$",
                                                  "^`Porosity Vignettes`:`Sensed presence`$",
                                                  "^`Porosity Scale`:`Sensed presence`$"),
                                        # dep.var.labels.include = F,
                                        dep.var.caption = "",
                                        single.row = T) 
cat(sub_interact_fun(table_s40s41_subscales_MR5), 
    file = "./stargazer_tables/table_s40s41_subscales_MR5.html")
htmltools::includeHTML("./stargazer_tables/table_s40s41_subscales_MR5.html")
Score
(1)(2)(3)(4)(5)(6)
Sensed presence0.14 (0.06, 0.22)0.14 (0.08, 0.19)0.13 (0.07, 0.20)0.10 (0.03, 0.17)0.14 (0.07, 0.20)0.10 (0.03, 0.17)
p = 0.001p = 0.000004p = 0.0001p = 0.01p = 0.0001p = 0.01
Porosity Vignettes0.24 (0.17, 0.31)0.24 (0.17, 0.31)
p = 0.00p = 0.00
Porosity Scale0.34 (0.27, 0.41)0.34 (0.27, 0.42)
p = 0.00p = 0.00
Porosity Vignettes:Sensed presence-0.02 (-0.09, 0.04)-0.02 (-0.09, 0.05)
p = 0.52p = 0.58
Porosity Scale:Sensed presence-0.02 (-0.09, 0.06)-0.02 (-0.10, 0.05)
p = 0.65p = 0.59
Scale: Spiritual Events-0.001 (-0.04, 0.03)-0.001 (-0.03, 0.03)-0.02 (-0.06, 0.03)-0.01 (-0.06, 0.04)-0.02 (-0.06, 0.03)-0.004 (-0.05, 0.05)
p = 0.94p = 0.97p = 0.46p = 0.83p = 0.49p = 0.90
Country: Gh.0.83 (0.71, 0.94)0.73 (0.60, 0.86)0.66 (0.53, 0.80)0.70 (0.57, 0.83)0.63 (0.49, 0.77)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.29 (-0.40, -0.18)-0.30 (-0.41, -0.19)-0.25 (-0.37, -0.14)-0.31 (-0.42, -0.19)-0.25 (-0.37, -0.12)
p = 0.0000004p = 0.0000001p = 0.00002p = 0.0000002p = 0.0001
Country: Ch.-0.86 (-0.98, -0.75)-0.71 (-0.87, -0.56)-0.61 (-0.77, -0.45)-0.69 (-0.85, -0.53)-0.60 (-0.76, -0.43)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.62 (0.51, 0.74)0.51 (0.37, 0.66)0.38 (0.19, 0.58)0.48 (0.32, 0.63)0.35 (0.16, 0.55)
p = 0.00p = 0.00p = 0.0001p = 0.00p = 0.0005
Gender: male-0.02 (-0.08, 0.04)0.01 (-0.04, 0.07)
p = 0.47p = 0.65
Age0.07 (0.001, 0.13)0.05 (-0.01, 0.11)
p = 0.05p = 0.13
Scale: Spiritual Events × Country: Gh.-0.02 (-0.08, 0.05)-0.07 (-0.15, 0.02)-0.09 (-0.18, 0.002)-0.07 (-0.15, 0.02)-0.09 (-0.18, 0.002)
p = 0.66p = 0.13p = 0.06p = 0.13p = 0.06
Scale: Spiritual Events × Country: Th.-0.12 (-0.18, -0.05)-0.11 (-0.18, -0.03)-0.13 (-0.21, -0.05)-0.11 (-0.18, -0.03)-0.13 (-0.21, -0.05)
p = 0.001p = 0.004p = 0.002p = 0.004p = 0.002
Scale: Spiritual Events × Country: Ch.0.20 (0.13, 0.27)0.16 (0.06, 0.26)0.14 (0.03, 0.25)0.16 (0.06, 0.26)0.14 (0.02, 0.25)
p = 0.00p = 0.002p = 0.02p = 0.003p = 0.02
Scale: Spiritual Events × Country: Va.-0.14 (-0.21, -0.07)-0.10 (-0.20, -0.01)-0.01 (-0.14, 0.12)-0.10 (-0.20, -0.01)-0.004 (-0.14, 0.13)
p = 0.0002p = 0.03p = 0.85p = 0.04p = 0.95
Scale: Spiritual Events × Porosity Vignettes0.03 (-0.01, 0.08)0.04 (-0.01, 0.08)
p = 0.13p = 0.12
Country: Gh. × Porosity Vignettes-0.13 (-0.25, -0.02)-0.13 (-0.25, -0.02)
p = 0.03p = 0.03
Country: Th. × Porosity Vignettes-0.05 (-0.17, 0.08)-0.06 (-0.18, 0.07)
p = 0.48p = 0.38
Country: Ch. × Porosity Vignettes0.06 (-0.11, 0.23)0.04 (-0.13, 0.21)
p = 0.48p = 0.65
Country: Va. × Porosity Vignettes-0.14 (-0.29, 0.01)-0.14 (-0.29, 0.02)
p = 0.08p = 0.09
Scale: Spiritual Events × Porosity Scale-0.01 (-0.06, 0.03)-0.02 (-0.06, 0.03)
p = 0.58p = 0.54
Country: Gh. × Porosity Scale-0.12 (-0.25, 0.01)-0.12 (-0.25, 0.01)
p = 0.08p = 0.08
Country: Th. × Porosity Scale-0.02 (-0.15, 0.11)-0.03 (-0.16, 0.11)
p = 0.74p = 0.69
Country: Ch. × Porosity Scale0.04 (-0.11, 0.20)0.03 (-0.13, 0.19)
p = 0.58p = 0.71
Country: Va. × Porosity Scale-0.15 (-0.33, 0.03)-0.14 (-0.32, 0.04)
p = 0.11p = 0.13
Scale: Spiritual Events:Sensed presence0.01 (-0.02, 0.05)0.01 (-0.02, 0.04)0.01 (-0.03, 0.05)-0.003 (-0.05, 0.05)0.01 (-0.03, 0.05)-0.004 (-0.05, 0.05)
p = 0.56p = 0.56p = 0.58p = 0.92p = 0.61p = 0.87
Country: Gh. × Sensed presence0.04 (-0.07, 0.16)0.05 (-0.07, 0.16)0.05 (-0.07, 0.17)0.05 (-0.07, 0.16)0.05 (-0.07, 0.17)
p = 0.49p = 0.45p = 0.45p = 0.45p = 0.41
Country: Th. × Sensed presence0.03 (-0.08, 0.15)0.02 (-0.09, 0.13)0.04 (-0.07, 0.15)0.02 (-0.09, 0.13)0.04 (-0.08, 0.15)
p = 0.55p = 0.68p = 0.50p = 0.71p = 0.53
Country: Ch. × Sensed presence0.03 (-0.09, 0.14)0.09 (-0.07, 0.26)0.06 (-0.10, 0.22)0.10 (-0.07, 0.26)0.06 (-0.11, 0.22)
p = 0.64p = 0.28p = 0.47p = 0.24p = 0.50
Country: Va. × Sensed presence-0.10 (-0.22, 0.01)-0.08 (-0.22, 0.05)-0.12 (-0.31, 0.07)-0.08 (-0.22, 0.07)-0.10 (-0.30, 0.09)
p = 0.09p = 0.22p = 0.22p = 0.31p = 0.31
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes0.08 (0.01, 0.16)0.08 (0.01, 0.16)
p = 0.03p = 0.04
Scale: Spiritual Events × Country: Th. × Porosity Vignettes-0.01 (-0.09, 0.07)-0.01 (-0.09, 0.07)
p = 0.74p = 0.73
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes-0.12 (-0.23, -0.01)-0.12 (-0.23, -0.01)
p = 0.04p = 0.04
Scale: Spiritual Events × Country: Va. × Porosity Vignettes-0.04 (-0.14, 0.05)-0.05 (-0.15, 0.05)
p = 0.37p = 0.35
Scale: Spiritual Events × Country: Gh. × Porosity Scale0.13 (0.05, 0.22)0.14 (0.05, 0.22)
p = 0.003p = 0.003
Scale: Spiritual Events × Country: Th. × Porosity Scale-0.01 (-0.10, 0.08)-0.01 (-0.10, 0.08)
p = 0.88p = 0.90
Scale: Spiritual Events × Country: Ch. × Porosity Scale-0.07 (-0.18, 0.03)-0.07 (-0.18, 0.04)
p = 0.18p = 0.20
Scale: Spiritual Events × Country: Va. × Porosity Scale-0.12 (-0.23, 0.003)-0.12 (-0.24, 0.001)
p = 0.06p = 0.06
Scale: Spiritual Events × Country: Gh. × Sensed presence-0.03 (-0.09, 0.04)-0.05 (-0.12, 0.03)-0.05 (-0.13, 0.03)-0.05 (-0.12, 0.03)-0.05 (-0.13, 0.03)
p = 0.47p = 0.23p = 0.22p = 0.25p = 0.24
Scale: Spiritual Events × Country: Th. × Sensed presence0.04 (-0.03, 0.11)0.05 (-0.02, 0.12)0.07 (-0.003, 0.15)0.05 (-0.02, 0.12)0.07 (-0.003, 0.15)
p = 0.24p = 0.19p = 0.06p = 0.20p = 0.06
Scale: Spiritual Events × Country: Ch. × Sensed presence-0.001 (-0.07, 0.07)-0.03 (-0.13, 0.08)-0.01 (-0.11, 0.10)-0.03 (-0.13, 0.08)-0.01 (-0.12, 0.10)
p = 0.98p = 0.60p = 0.91p = 0.61p = 0.93
Scale: Spiritual Events × Country: Va. × Sensed presence0.01 (-0.06, 0.09)0.07 (-0.01, 0.16)0.01 (-0.12, 0.14)0.07 (-0.03, 0.16)0.01 (-0.13, 0.14)
p = 0.70p = 0.09p = 0.84p = 0.16p = 0.91
Scale: Spiritual Events × Porosity Vignettes:Sensed presence-0.02 (-0.07, 0.02)-0.02 (-0.07, 0.02)
p = 0.28p = 0.33
Country: Gh. × Porosity Vignettes:Sensed presence-0.06 (-0.18, 0.05)-0.06 (-0.18, 0.06)
p = 0.29p = 0.35
Country: Th. × Porosity Vignettes:Sensed presence0.08 (-0.04, 0.19)0.07 (-0.05, 0.18)
p = 0.19p = 0.25
Country: Ch. × Porosity Vignettes:Sensed presence0.14 (-0.03, 0.31)0.12 (-0.05, 0.30)
p = 0.12p = 0.16
Country: Va. × Porosity Vignettes:Sensed presence-0.03 (-0.17, 0.11)-0.04 (-0.18, 0.11)
p = 0.66p = 0.61
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes:Sensed presence-0.005 (-0.08, 0.07)-0.01 (-0.08, 0.07)
p = 0.91p = 0.88
Scale: Spiritual Events × Country: Th. × Porosity Vignettes:Sensed presence0.11 (0.04, 0.19)0.11 (0.04, 0.19)
p = 0.002p = 0.003
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes:Sensed presence-0.02 (-0.13, 0.09)-0.02 (-0.13, 0.09)
p = 0.71p = 0.71
Scale: Spiritual Events × Country: Va. × Porosity Vignettes:Sensed presence-0.10 (-0.19, -0.01)-0.09 (-0.19, 0.0005)
p = 0.04p = 0.06
Scale: Spiritual Events × Porosity Scale:Sensed presence0.02 (-0.03, 0.07)0.02 (-0.03, 0.07)
p = 0.45p = 0.50
Country: Gh. × Porosity Scale:Sensed presence-0.06 (-0.19, 0.06)-0.05 (-0.18, 0.08)
p = 0.34p = 0.43
Country: Th. × Porosity Scale:Sensed presence0.03 (-0.10, 0.17)0.04 (-0.10, 0.17)
p = 0.65p = 0.60
Country: Ch. × Porosity Scale:Sensed presence0.07 (-0.08, 0.22)0.06 (-0.09, 0.22)
p = 0.37p = 0.45
Country: Va. × Porosity Scale:Sensed presence0.07 (-0.14, 0.27)0.05 (-0.16, 0.26)
p = 0.53p = 0.64
Scale: Spiritual Events × Country: Gh. × Porosity Scale:Sensed presence0.02 (-0.07, 0.10)0.02 (-0.07, 0.11)
p = 0.68p = 0.66
Scale: Spiritual Events × Country: Th. × Porosity Scale:Sensed presence0.08 (-0.01, 0.17)0.08 (-0.01, 0.17)
p = 0.08p = 0.08
Scale: Spiritual Events × Country: Ch. × Porosity Scale:Sensed presence-0.05 (-0.16, 0.05)-0.05 (-0.16, 0.05)
p = 0.30p = 0.32
Scale: Spiritual Events × Country: Va. × Porosity Scale:Sensed presence0.01 (-0.13, 0.15)0.01 (-0.13, 0.15)
p = 0.89p = 0.94
Constant-0.001 (-0.08, 0.08)0.02 (-0.04, 0.07)0.07 (0.004, 0.14)0.07 (-0.001, 0.15)0.06 (-0.01, 0.13)0.07 (-0.0001, 0.15)
p = 0.98p = 0.58p = 0.04p = 0.06p = 0.08p = 0.06
Observations1,0081,0081,0081,008978978
Log Likelihood-1,284.75-1,130.40-1,106.45-1,094.71-1,085.16-1,075.08
Akaike Inf. Crit.2,581.492,304.792,296.912,273.412,258.332,238.15
Bayesian Inf. Crit.2,610.992,412.942,503.372,479.872,473.292,453.11
table_s40s41_subscales_MR6 <- stargazer(r105_spirit_MR6, r108_spirit_MR6, 
                                        r109_spirit_MR6, r110_spirit_MR6,
                                        r111_spirit_MR6, r112_spirit_MR6,
                                        type = "html",
                                        ci = T,
                                        report = c("vcsp"),
                                        digits = 2,
                                        digits.extra = 1000,
                                        omit.table.layout = "n",
                                        order = c("^`Altered states of consciousness \\(b\\)`$",
                                                  "^`Porosity Vignettes`$",
                                                  "^`Porosity Scale`$",
                                                  "^`Porosity Vignettes`:`Altered states of consciousness \\(b\\)`$",
                                                  "^`Porosity Scale`:`Altered states of consciousness \\(b\\)`$"),
                                        # dep.var.labels.include = F,
                                        dep.var.caption = "",
                                        single.row = T) 
cat(sub_interact_fun(table_s40s41_subscales_MR6), 
    file = "./stargazer_tables/table_s40s41_subscales_MR6.html")
htmltools::includeHTML("./stargazer_tables/table_s40s41_subscales_MR6.html")
Score
(1)(2)(3)(4)(5)(6)
Altered states of consciousness (b)0.16 (0.08, 0.24)0.16 (0.10, 0.21)0.14 (0.07, 0.21)0.12 (0.05, 0.19)0.14 (0.07, 0.21)0.13 (0.05, 0.20)
p = 0.0001p = 0.0000001p = 0.0001p = 0.0005p = 0.00004p = 0.001
Porosity Vignettes0.25 (0.18, 0.32)0.25 (0.18, 0.32)
p = 0.00p = 0.00
Porosity Scale0.33 (0.25, 0.40)0.33 (0.26, 0.41)
p = 0.00p = 0.00
Porosity Vignettes:Altered states of consciousness (b)0.03 (-0.03, 0.10)0.04 (-0.02, 0.11)
p = 0.33p = 0.22
Porosity Scale:Altered states of consciousness (b)0.03 (-0.04, 0.10)0.04 (-0.03, 0.11)
p = 0.42p = 0.32
Scale: Spiritual Events-0.002 (-0.04, 0.03)-0.001 (-0.03, 0.03)-0.02 (-0.07, 0.02)-0.001 (-0.05, 0.05)-0.02 (-0.06, 0.02)0.003 (-0.05, 0.05)
p = 0.94p = 0.97p = 0.30p = 0.97p = 0.36p = 0.92
Country: Gh.0.83 (0.71, 0.94)0.68 (0.56, 0.81)0.61 (0.48, 0.74)0.67 (0.54, 0.80)0.58 (0.45, 0.72)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Th.-0.29 (-0.40, -0.18)-0.32 (-0.43, -0.21)-0.27 (-0.39, -0.15)-0.32 (-0.44, -0.20)-0.27 (-0.39, -0.14)
p = 0.0000004p = 0.00000003p = 0.00001p = 0.0000001p = 0.00003
Country: Ch.-0.86 (-0.98, -0.75)-0.65 (-0.80, -0.49)-0.60 (-0.76, -0.44)-0.62 (-0.78, -0.46)-0.59 (-0.75, -0.42)
p = 0.00p = 0.00p = 0.00p = 0.00p = 0.00
Country: Va.0.62 (0.51, 0.74)0.52 (0.37, 0.66)0.46 (0.26, 0.66)0.50 (0.35, 0.66)0.44 (0.24, 0.65)
p = 0.00p = 0.00p = 0.00001p = 0.00p = 0.00003
Gender: male-0.02 (-0.08, 0.04)0.01 (-0.05, 0.07)
p = 0.46p = 0.68
Age0.05 (-0.01, 0.11)0.04 (-0.02, 0.11)
p = 0.13p = 0.18
Scale: Spiritual Events × Country: Gh.-0.02 (-0.08, 0.05)-0.05 (-0.13, 0.03)-0.07 (-0.15, 0.02)-0.05 (-0.14, 0.03)-0.07 (-0.16, 0.02)
p = 0.64p = 0.22p = 0.13p = 0.21p = 0.12
Scale: Spiritual Events × Country: Th.-0.12 (-0.18, -0.05)-0.10 (-0.17, -0.03)-0.14 (-0.21, -0.06)-0.10 (-0.17, -0.03)-0.14 (-0.22, -0.06)
p = 0.0005p = 0.01p = 0.001p = 0.01p = 0.001
Scale: Spiritual Events × Country: Ch.0.20 (0.13, 0.27)0.16 (0.06, 0.26)0.12 (0.02, 0.23)0.16 (0.06, 0.26)0.12 (0.01, 0.23)
p = 0.00p = 0.002p = 0.03p = 0.003p = 0.04
Scale: Spiritual Events × Country: Va.-0.14 (-0.21, -0.07)-0.12 (-0.21, -0.02)0.02 (-0.12, 0.15)-0.11 (-0.21, -0.01)0.03 (-0.11, 0.17)
p = 0.0002p = 0.02p = 0.81p = 0.03p = 0.66
Scale: Spiritual Events × Porosity Vignettes0.03 (-0.02, 0.07)0.03 (-0.02, 0.07)
p = 0.21p = 0.22
Country: Gh. × Porosity Vignettes-0.12 (-0.23, 0.001)-0.12 (-0.24, -0.0005)
p = 0.06p = 0.05
Country: Th. × Porosity Vignettes-0.08 (-0.20, 0.05)-0.09 (-0.21, 0.04)
p = 0.24p = 0.19
Country: Ch. × Porosity Vignettes0.12 (-0.05, 0.29)0.10 (-0.07, 0.27)
p = 0.18p = 0.24
Country: Va. × Porosity Vignettes-0.16 (-0.31, -0.01)-0.16 (-0.32, -0.01)
p = 0.04p = 0.04
Scale: Spiritual Events × Porosity Scale-0.03 (-0.08, 0.01)-0.04 (-0.08, 0.01)
p = 0.18p = 0.17
Country: Gh. × Porosity Scale-0.07 (-0.19, 0.06)-0.07 (-0.19, 0.06)
p = 0.31p = 0.31
Country: Th. × Porosity Scale-0.02 (-0.16, 0.11)-0.03 (-0.17, 0.10)
p = 0.74p = 0.66
Country: Ch. × Porosity Scale0.08 (-0.08, 0.23)0.07 (-0.09, 0.22)
p = 0.33p = 0.40
Country: Va. × Porosity Scale-0.21 (-0.40, -0.03)-0.22 (-0.40, -0.03)
p = 0.03p = 0.03
Scale: Spiritual Events:Altered states of consciousness (b)0.06 (0.02, 0.09)0.06 (0.02, 0.09)0.05 (0.01, 0.10)0.09 (0.04, 0.14)0.05 (0.01, 0.10)0.09 (0.04, 0.14)
p = 0.002p = 0.002p = 0.02p = 0.0002p = 0.02p = 0.0002
Country: Gh. × Altered states of consciousness (b)-0.07 (-0.18, 0.05)-0.09 (-0.22, 0.03)-0.07 (-0.20, 0.05)-0.09 (-0.22, 0.04)-0.08 (-0.21, 0.04)
p = 0.24p = 0.15p = 0.26p = 0.17p = 0.20
Country: Th. × Altered states of consciousness (b)-0.01 (-0.12, 0.10)-0.02 (-0.13, 0.09)-0.01 (-0.12, 0.10)-0.02 (-0.13, 0.09)-0.005 (-0.12, 0.11)
p = 0.84p = 0.77p = 0.90p = 0.77p = 0.94
Country: Ch. × Altered states of consciousness (b)-0.06 (-0.18, 0.05)0.08 (-0.09, 0.24)-0.01 (-0.17, 0.15)0.07 (-0.09, 0.23)-0.02 (-0.17, 0.14)
p = 0.30p = 0.36p = 0.91p = 0.39p = 0.83
Country: Va. × Altered states of consciousness (b)0.03 (-0.09, 0.15)0.11 (-0.03, 0.26)0.09 (-0.09, 0.27)0.11 (-0.03, 0.26)0.09 (-0.08, 0.27)
p = 0.64p = 0.14p = 0.32p = 0.13p = 0.31
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes0.07 (-0.0001, 0.15)0.07 (-0.002, 0.15)
p = 0.06p = 0.06
Scale: Spiritual Events × Country: Th. × Porosity Vignettes-0.01 (-0.09, 0.07)-0.01 (-0.10, 0.07)
p = 0.73p = 0.73
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes-0.11 (-0.22, -0.0005)-0.11 (-0.22, 0.002)
p = 0.05p = 0.06
Scale: Spiritual Events × Country: Va. × Porosity Vignettes-0.02 (-0.11, 0.08)-0.03 (-0.13, 0.08)
p = 0.75p = 0.63
Scale: Spiritual Events × Country: Gh. × Porosity Scale0.13 (0.05, 0.22)0.14 (0.05, 0.22)
p = 0.002p = 0.002
Scale: Spiritual Events × Country: Th. × Porosity Scale-0.01 (-0.09, 0.08)-0.01 (-0.10, 0.08)
p = 0.89p = 0.90
Scale: Spiritual Events × Country: Ch. × Porosity Scale-0.06 (-0.16, 0.04)-0.06 (-0.16, 0.05)
p = 0.27p = 0.31
Scale: Spiritual Events × Country: Va. × Porosity Scale-0.12 (-0.24, 0.004)-0.13 (-0.25, -0.01)
p = 0.06p = 0.05
Scale: Spiritual Events × Country: Gh. × Altered states of consciousness (b)0.01 (-0.06, 0.08)0.001 (-0.08, 0.08)0.01 (-0.07, 0.10)-0.001 (-0.08, 0.08)0.01 (-0.07, 0.10)
p = 0.83p = 0.99p = 0.75p = 0.99p = 0.81
Scale: Spiritual Events × Country: Th. × Altered states of consciousness (b)0.0005 (-0.06, 0.07)0.002 (-0.07, 0.07)-0.02 (-0.09, 0.05)0.001 (-0.07, 0.07)-0.02 (-0.10, 0.05)
p = 0.99p = 0.96p = 0.63p = 0.99p = 0.59
Scale: Spiritual Events × Country: Ch. × Altered states of consciousness (b)-0.04 (-0.11, 0.03)-0.07 (-0.17, 0.04)-0.06 (-0.16, 0.04)-0.07 (-0.17, 0.04)-0.06 (-0.17, 0.04)
p = 0.23p = 0.21p = 0.26p = 0.20p = 0.25
Scale: Spiritual Events × Country: Va. × Altered states of consciousness (b)-0.03 (-0.10, 0.04)0.03 (-0.06, 0.12)0.03 (-0.09, 0.14)0.03 (-0.06, 0.13)0.03 (-0.09, 0.15)
p = 0.41p = 0.55p = 0.66p = 0.51p = 0.66
Scale: Spiritual Events × Porosity Vignettes:Altered states of consciousness (b)-0.01 (-0.05, 0.03)-0.01 (-0.05, 0.03)
p = 0.62p = 0.63
Country: Gh. × Porosity Vignettes:Altered states of consciousness (b)-0.004 (-0.12, 0.12)-0.01 (-0.14, 0.11)
p = 0.96p = 0.81
Country: Th. × Porosity Vignettes:Altered states of consciousness (b)0.09 (-0.02, 0.21)0.08 (-0.03, 0.20)
p = 0.11p = 0.17
Country: Ch. × Porosity Vignettes:Altered states of consciousness (b)0.09 (-0.07, 0.26)0.07 (-0.10, 0.24)
p = 0.27p = 0.43
Country: Va. × Porosity Vignettes:Altered states of consciousness (b)-0.14 (-0.28, 0.005)-0.15 (-0.30, -0.01)
p = 0.06p = 0.04
Scale: Spiritual Events × Country: Gh. × Porosity Vignettes:Altered states of consciousness (b)-0.01 (-0.09, 0.07)-0.01 (-0.09, 0.07)
p = 0.83p = 0.83
Scale: Spiritual Events × Country: Th. × Porosity Vignettes:Altered states of consciousness (b)0.06 (-0.01, 0.14)0.06 (-0.01, 0.14)
p = 0.10p = 0.11
Scale: Spiritual Events × Country: Ch. × Porosity Vignettes:Altered states of consciousness (b)-0.02 (-0.13, 0.09)-0.02 (-0.13, 0.09)
p = 0.72p = 0.74
Scale: Spiritual Events × Country: Va. × Porosity Vignettes:Altered states of consciousness (b)-0.07 (-0.16, 0.02)-0.07 (-0.17, 0.02)
p = 0.13p = 0.13
Scale: Spiritual Events × Porosity Scale:Altered states of consciousness (b)-0.01 (-0.05, 0.04)-0.004 (-0.05, 0.04)
p = 0.75p = 0.86
Country: Gh. × Porosity Scale:Altered states of consciousness (b)0.004 (-0.12, 0.13)0.002 (-0.13, 0.13)
p = 0.95p = 0.98
Country: Th. × Porosity Scale:Altered states of consciousness (b)0.06 (-0.07, 0.18)0.05 (-0.07, 0.18)
p = 0.39p = 0.43
Country: Ch. × Porosity Scale:Altered states of consciousness (b)0.04 (-0.11, 0.18)0.02 (-0.13, 0.16)
p = 0.62p = 0.83
Country: Va. × Porosity Scale:Altered states of consciousness (b)-0.08 (-0.25, 0.09)-0.09 (-0.26, 0.08)
p = 0.34p = 0.31
Scale: Spiritual Events × Country: Gh. × Porosity Scale:Altered states of consciousness (b)-0.08 (-0.16, 0.01)-0.08 (-0.17, 0.01)
p = 0.08p = 0.07
Scale: Spiritual Events × Country: Th. × Porosity Scale:Altered states of consciousness (b)0.08 (-0.01, 0.16)0.07 (-0.01, 0.16)
p = 0.07p = 0.09
Scale: Spiritual Events × Country: Ch. × Porosity Scale:Altered states of consciousness (b)0.02 (-0.08, 0.11)0.02 (-0.08, 0.11)
p = 0.72p = 0.76
Scale: Spiritual Events × Country: Va. × Porosity Scale:Altered states of consciousness (b)-0.07 (-0.18, 0.04)-0.07 (-0.19, 0.04)
p = 0.21p = 0.22
Constant-0.002 (-0.08, 0.08)0.02 (-0.04, 0.07)0.07 (0.004, 0.14)0.08 (0.004, 0.15)0.06 (-0.01, 0.13)0.08 (0.01, 0.16)
p = 0.98p = 0.58p = 0.04p = 0.04p = 0.09p = 0.04
Observations1,0081,0081,0081,008978978
Log Likelihood-1,278.27-1,119.88-1,109.91-1,091.10-1,086.86-1,070.19
Akaike Inf. Crit.2,568.552,283.762,303.822,266.192,261.722,228.38
Bayesian Inf. Crit.2,598.042,391.912,510.282,472.652,476.682,443.34
LS0tCnRpdGxlOiAiUmVwbHkgdG8gVGVyaHVuZSBldCBhbC4iCnN1YnRpdGxlOiAiTHVocm1hbm4sIFdlaXNtYW4sIGV0IGFsLiIKb3V0cHV0OiAKICBodG1sX25vdGVib29rOgogICAgdG9jOiB0cnVlCiAgICB0b2NfZmxvYXQ6IHRydWUKICAgIGNvZGVfZm9sZGluZzogaGlkZQotLS0KCkluIFN0dWR5IDEsIGFkdWx0cyB3aXRoIHN0cm9uZyByZWxpZ2lvdXMgY29tbWl0bWVudHMgYW5kIGZhaXRoIHByYWN0aWNlcyB3ZXJlIGludGVydmlld2VkIGluIGRlcHRoIGFib3V0IHRoZWlyIHNwaXJpdHVhbCBleHBlcmllbmNlcyBhbmQgdGhlaXIgdW5kZXJzdGFuZGluZyBvZiB0aGUgbWluZCBieSBleHBlcmllbmNlZCBldGhub2dyYXBoZXJzLiBUaGVzZSBpbnRlcnZpZXdzIHlpZWxkZWQgb25lIG1lYXN1cmUgb2YgcG9yb3NpdHkgKOKAnFBvcm9zaXR5IFZpZ25ldHRlc+KAnSksIG9uZSBtZWFzdXJlIG9mIGFic29ycHRpb24gKHRoZSBBYnNvcnB0aW9uIHNjYWxlKSwgYW5kIG9uZSBtZWFzdXJlIG9mIHNwaXJpdHVhbCBleHBlcmllbmNlICjigJxTcGlyaXR1YWwgRXZlbnRz4oCdIHNjYWxlKS4KClRoaXMgbm90ZWJvb2sgY29udGFpbnMgYWxsIG9mIHRoZSBhbmFseXNlcyBmb3IgU3R1ZHkgMSAocmV2aXNlZCBKdWx5IDIwMjApLgoKYGBge3IsIG1lc3NhZ2UgPSBGfQpzb3VyY2UoIi4uL3NjcmlwdHNfZ2VuZXJhbC9kZXBlbmRlbmNpZXMuUiIpCnNvdXJjZSgiLi4vc2NyaXB0c19nZW5lcmFsL2N1c3RvbV9mdW5zLlIiKQpzb3VyY2UoIi4uL3NjcmlwdHNfZ2VuZXJhbC92YXJfcmVjb2RlX2NvbnRyYXN0LlIiKQpzb3VyY2UoIi4uL3NjcmlwdHNfZ2VuZXJhbC9kYXRhX2xvYWQuUiIpCmBgYAoKYGBge3J9CiMgZ2V0IGl0ZW0tbGV2ZWwgcXVlc3Rpb24KZDFfYnlxIDwtIHJlYWRfY3N2KCIuL2RhdGFfYnlxdWVzdGlvbi9zdHVkeTFfYnlxdWVzdGlvbi5jc3YiKQpkM19ieXEgPC0gcmVhZF9jc3YoIi4vZGF0YV9ieXF1ZXN0aW9uL3BhY2tldHMxMjNfZGF0YV9ieXF1ZXN0aW9uX2xvbmcuY3N2IikgJT4lCiAgZmlsdGVyKHBhY2tldCA9PSAxKQpkNF9ieXEgPC0gcmVhZF9jc3YoIi4vZGF0YV9ieXF1ZXN0aW9uL3N0dWR5NF9ieXF1ZXN0aW9uLmNzdiIpCmBgYAoKYGBge3J9CiMgZGF0YWZyYW1lIHdpdGggdmFyaWFibGUgbmFtZXMgb3B0aW1pemVkIGZvciBzdGFyZ2F6ZXIgdGFibGVzCmQxX2ZvcnRhYiA8LSBkMSAlPiUKICBtdXRhdGVfYXQodmFycyhlbmRzX3dpdGgoIl9zY29yZSIpLCBzdWJqZWN0X2FnZSksIHNjYWxlKSAlPiUKICBtdXRhdGUoc3ViamVjdF9ocyA9IGNhc2Vfd2hlbihpcy5uYShzdWJqZWN0X2hzKSB+IE5BX2NoYXJhY3Rlcl8sCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZ3JlcGwoInllcyIsIHRvbG93ZXIoc3ViamVjdF9ocykpIH4gInllcyIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgVFJVRSB+ICJubyIpLAogICAgICAgICBzdWJqZWN0X2hzID0gZmFjdG9yKHN1YmplY3RfaHMsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgIGxldmVscyA9IGMoIm5vIiwgInllcyIpKSwKICAgICAgICAgc3ViamVjdF9nZW5kZXIgPSBmYWN0b3Ioc3ViamVjdF9nZW5kZXIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBsZXZlbHMgPSBjKCJGZW1hbGUiLCAiTWFsZSIpKSkgJT4lCiAgcmVuYW1lKCJTcGlyaXR1YWwgRXZlbnRzIiA9ICJzcGV2X3Njb3JlIiwKICAgICAgICAgIlNwaXJpdHVhbCBFdmVudHMsIHJlY29kZWQiID0gInNwZXZfcmVjb2RlZF9zY29yZSIsCiAgICAgICAgICJQb3Jvc2l0eSBWaWduZXR0ZXMiID0gInB2X3Njb3JlIiwKICAgICAgICAgIkFic29ycHRpb24iID0gImFic19zY29yZSIsCiAgICAgICAgICJDb3VudHJ5IiA9ICJjb3VudHJ5IiwKICAgICAgICAgIlNpdGUiID0gInNpdGUiLAogICAgICAgICAiUmVsaWdpb24iID0gInJlbGlnaW9uIiwKICAgICAgICAgIkdlbmRlciIgPSAic3ViamVjdF9nZW5kZXIiLAogICAgICAgICAiQWdlIiA9ICJzdWJqZWN0X2FnZSIsCiAgICAgICAgICJFZHVjYXRpb24iID0gInN1YmplY3RfaHMiKQpgYGAKCmBgYHtyfQojIHNldCBjb250cmFzdHMKY29udHJhc3RzKGQxX2ZvcnRhYiRDb3VudHJ5KSA8LSBjYmluZCgiOiBHaC4iID0gYygtMSwgMSwgMCwgMCwgMCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjogVGguIiA9IGMoLTEsIDAsIDEsIDAsIDApLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI6IENoLiIgPSBjKC0xLCAwLCAwLCAxLCAwKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiOiBWYS4iID0gYygtMSwgMCwgMCwgMCwgMSkpCmNvbnRyYXN0cyhkMV9mb3J0YWIkU2l0ZSkgPC0gY2JpbmQoIjogcnVyYWwiID0gYygtMSwgMSkpCmNvbnRyYXN0cyhkMV9mb3J0YWIkUmVsaWdpb24pIDwtIGNiaW5kKCI6IENDIiA9IGMoMSwgLTEpKQpjb250cmFzdHMoZDFfZm9ydGFiJEVkdWNhdGlvbikgPC0gY2JpbmQoIjogYXQgbGVhc3QgSFMiID0gYygtMSwgMSkpCmNvbnRyYXN0cyhkMV9mb3J0YWIkR2VuZGVyKSA8LSBjYmluZCgiOiBtYWxlIiA9IGMoLTEsIDEpKQpgYGAKCmBgYHtyfQojIGRhdGFmcmFtZSB3aXRoIHZhcmlhYmxlIG5hbWVzIG9wdGltaXplZCBmb3Igc3RhcmdhemVyIHRhYmxlcwpkM19mb3J0YWIgPC0gZDMgJT4lCiAgbXV0YXRlX2F0KHZhcnMoZW5kc193aXRoKCJfc2NvcmUiKSwgc3ViamVjdF9hZ2UpLCBzY2FsZSkgJT4lCiAgbXV0YXRlKHN1YmplY3RfZ2VuZGVyID0gZmFjdG9yKHN1YmplY3RfZ2VuZGVyLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbGV2ZWxzID0gYygiZmVtYWxlIiwgIm1hbGUiKSkpICU+JQogIHJlbmFtZSgiU3Bpcml0dWFsIEV2ZW50cyIgPSAic3Bldl9zY29yZSIsCiAgICAgICAgICJEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXMiID0gImRzZV9zY29yZSIsCiAgICAgICAgICJBYnNvcnB0aW9uIiA9ICJhYnNfc2NvcmUiLAogICAgICAgICAiQ291bnRyeSIgPSAiY291bnRyeSIsCiAgICAgICAgICJHZW5kZXIiID0gInN1YmplY3RfZ2VuZGVyIiwKICAgICAgICAgIkFnZSIgPSAic3ViamVjdF9hZ2UiKQpgYGAKCmBgYHtyfQojIHNldCBjb250cmFzdHMKY29udHJhc3RzKGQzX2ZvcnRhYiRDb3VudHJ5KSA8LSBjYmluZCgiOiBHaC4iID0gYygtMSwgMSwgMCwgMCwgMCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjogVGguIiA9IGMoLTEsIDAsIDEsIDAsIDApLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI6IENoLiIgPSBjKC0xLCAwLCAwLCAxLCAwKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiOiBWYS4iID0gYygtMSwgMCwgMCwgMCwgMSkpCmNvbnRyYXN0cyhkM19mb3J0YWIkR2VuZGVyKSA8LSBjYmluZCgiOiBtYWxlIiA9IGMoLTEsIDEpKQpgYGAKCmBgYHtyfQojIGRhdGFmcmFtZSB3aXRoIHZhcmlhYmxlIG5hbWVzIG9wdGltaXplZCBmb3Igc3RhcmdhemVyIHRhYmxlcwpkNF9mb3J0YWIgPC0gZDQgJT4lCiAgbXV0YXRlX2F0KHZhcnMoZW5kc193aXRoKCJfc2NvcmUiKSwgc3ViamVjdF9hZ2UpLCBzY2FsZSkgJT4lCiAgbXV0YXRlKHN1YmplY3RfZ2VuZGVyID0gZmFjdG9yKHN1YmplY3RfZ2VuZGVyLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbGV2ZWxzID0gYygiZmVtYWxlIiwgIm1hbGUiKSkpICU+JQogIHJlbmFtZSgiU3Bpcml0dWFsIEV2ZW50cyIgPSAic3Bldl9zY29yZSIsCiAgICAgICAgICJEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZSIgPSAiZHNlX3Njb3JlIiwKICAgICAgICAgIlBvcm9zaXR5IFZpZ25ldHRlcyIgPSAicHZfc2NvcmUiLAogICAgICAgICAiUG9yb3NpdHkgU2NhbGUiID0gInBvcl9zY29yZSIsCiAgICAgICAgICJBYnNvcnB0aW9uIiA9ICJhYnNfc2NvcmUiLAogICAgICAgICAiSGFsbHVjaW5hdGlvbnMiID0gImhhbGxfc2NvcmUiLAogICAgICAgICAiUGFyYW5vcm1hbCIgPSAicGFyYV9zY29yZSIsCiAgICAgICAgICJOZWVkIGZvciBDb2duaXRpb24iID0gImNvZ19zY29yZSIsCiAgICAgICAgICJTZW5zZSBvZiBDb250cm9sIiA9ICJjdGxfc2NvcmUiLAogICAgICAgICAiQ291bnRyeSIgPSAiY291bnRyeSIsCiAgICAgICAgICJHZW5kZXIiID0gInN1YmplY3RfZ2VuZGVyIiwKICAgICAgICAgIkFnZSIgPSAic3ViamVjdF9hZ2UiKQpgYGAKCmBgYHtyfQojIHNldCBjb250cmFzdHMKY29udHJhc3RzKGQ0X2ZvcnRhYiRDb3VudHJ5KSA8LSBjYmluZCgiOiBHaC4iID0gYygtMSwgMSwgMCwgMCwgMCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjogVGguIiA9IGMoLTEsIDAsIDEsIDAsIDApLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI6IENoLiIgPSBjKC0xLCAwLCAwLCAxLCAwKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiOiBWYS4iID0gYygtMSwgMCwgMCwgMCwgMSkpCmNvbnRyYXN0cyhkNF9mb3J0YWIkR2VuZGVyKSA8LSBjYmluZCgiOiBtYWxlIiA9IGMoLTEsIDEpKQpgYGAKCiMgT21pdHRpbmcgdHdvIHByZXNlbmNlIGl0ZW1zCgoiSSBjYW4gb2Z0ZW4gc29tZWhvdyBzZW5zZSB0aGUgcHJlc2VuY2Ugb2YgYW5vdGhlciBwZXJzb24gYmVmb3JlIEkgYWN0dWFsbHkgc2VlIG9yIGhlYXIgaGVyL2hpbS4iCiJBdCB0aW1lcyBJIHNvbWVob3cgZmVlbCB0aGUgcHJlc2VuY2Ugb2Ygc29tZW9uZSB3aG8gaXMgbm90IHBoeXNpY2FsbHkgdGhlcmUiCgojIyBTdHVkeSAxCgpgYGB7cn0KZDFfYWJzX29taXQgPC0gZDFfYnlxICU+JQogIHNlbGVjdChzdWJqZWN0X2lkLCBjb3VudHJ5LCBlbmRzX3dpdGgoIl9hYnMiKSkgJT4lCiAgc2VsZWN0KC1zZW5zZXByZXNlbmNlX2FicywgLWludmlzaWJsZXByZXNlbmNlX2FicykgJT4lCiAgZ2F0aGVyKHF1ZXN0aW9uLCByZXNwb25zZSwgLXN1YmplY3RfaWQsIC1jb3VudHJ5KSAlPiUKICBncm91cF9ieShzdWJqZWN0X2lkLCBjb3VudHJ5KSAlPiUKICBzdW1tYXJpc2UoQWJzb3JwdGlvbiA9IG1lYW4ocmVzcG9uc2UsIG5hLnJtID0gVCkpICU+JQogIHVuZ3JvdXAoKSAlPiUKICBncm91cF9ieShjb3VudHJ5KSAlPiUKICBtdXRhdGUoQWJzb3JwdGlvbiA9IHNjYWxlKEFic29ycHRpb24pKSAlPiUKICB1bmdyb3VwKCkgJT4lCiAgZGlzdGluY3Qoc3ViamVjdF9pZCwgQWJzb3JwdGlvbikgJT4lCiAgcmlnaHRfam9pbihkMV9mb3J0YWIgJT4lIHNlbGVjdCgtQWJzb3JwdGlvbikpICU+JQogIGZpbHRlcihzdWJqZWN0X2lkICVpbiUgZDFfZm9ydGFiJHN1YmplY3RfaWQpCmBgYAoKIyMjIFRhYmxlIFMyMC4gU3R1ZHkgMSwgU3Bpcml0dWFsIEV2ZW50czogcmVsYXRpb25zaGlwcyB3aXRoIFBvcm9zaXR5IFZpZ25ldHRlcyBhbmQgQWJzb3JwdGlvbiAoc2FtcGxlIGFzIGZpeGVkIGVmZmVjdCkKCmBgYHtyfQpyMDRfc3BldiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgUG9yb3NpdHkgVmlnbmV0dGVzYCwKICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19vbWl0KQoKcjA1X3NwZXYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQWJzb3JwdGlvbiwKICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19vbWl0KQoKcjA2X3NwZXYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBBYnNvcnB0aW9uLAogICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX29taXQpCgpyMDdfc3BldiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYCwKICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19vbWl0KQoKcjA4X3NwZXYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIFNpdGUgKiBSZWxpZ2lvbiAKICAgICAgICAgICAgICAgKyBBYnNvcnB0aW9uICsgQ291bnRyeTpBYnNvcnB0aW9uLAogICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX29taXQpCgpyMDlfc3BldiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYAogICAgICAgICAgICAgICArIEFic29ycHRpb24gKyBDb3VudHJ5OkFic29ycHRpb24KICAgICAgICAgICAgICAgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYDpBYnNvcnB0aW9uIAogICAgICAgICAgICAgICArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2A6QWJzb3JwdGlvbiwKICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19vbWl0KQoKcjEwX3NwZXYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIFNpdGUgKiBSZWxpZ2lvbiAKICAgICAgICAgICAgICAgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2AKICAgICAgICAgICAgICAgKyBBYnNvcnB0aW9uICsgQ291bnRyeTpBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2A6QWJzb3JwdGlvbgogICAgICAgICAgICAgICArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2A6QWJzb3JwdGlvbgogICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSArIEVkdWNhdGlvbiwKICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19vbWl0KQpgYGAKCmBgYHtyLCBpbmNsdWRlID0gRn0KIyBydW4gbWFudWFsbHkgdG8gY2hlY2sgY29udmVyZ2VuY2UKc3VtbWFyeShyMDRfc3BldikKc3VtbWFyeShyMDVfc3BldikKc3VtbWFyeShyMDZfc3BldikKc3VtbWFyeShyMDdfc3BldikKc3VtbWFyeShyMDhfc3BldikKc3VtbWFyeShyMDlfc3BldikKc3VtbWFyeShyMTBfc3BldikKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczIwIDwtIHN0YXJnYXplcihyMDRfc3BldiwgcjA1X3NwZXYsIHIwNl9zcGV2LCAKICAgICAgICAgICAgICAgICAgICAgICByMDdfc3BldiwgcjA4X3NwZXYsIHIwOV9zcGV2LCByMTBfc3BldiwKICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeQWJzb3JwdGlvbiQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOkFic29ycHRpb24kIiksCiAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICBzaW5nbGUucm93ID0gVCkKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3MyMCksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczIwLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczIwLmh0bWwiKQpgYGAKCiMjIyBUYWJsZSBTMjEuIFN0dWR5IDEsIFNwaXJpdHVhbCBFdmVudHM6IHJlbGF0aW9uc2hpcHMgd2l0aCBQb3Jvc2l0eSBWaWduZXR0ZXMgYW5kIEFic29ycHRpb24gKHNhbXBsZSBhcyByYW5kb20gZWZmZWN0KQoKYGBge3J9CnIxMV9zcGV2IDwtIGxtZXIoYFNwaXJpdHVhbCBFdmVudHNgIH4gMSAKICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeS9TaXRlL1JlbGlnaW9uKSwKICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfb21pdCkKCnIxMl9zcGV2IDwtIGxtZXIoYFNwaXJpdHVhbCBFdmVudHNgIH4gYFBvcm9zaXR5IFZpZ25ldHRlc2AgCiAgICAgICAgICAgICAgICAgIyArICgxICsgYFBvcm9zaXR5IFZpZ25ldHRlc2AgfCBDb3VudHJ5L1NpdGUvUmVsaWdpb24pLAogICAgICAgICAgICAgICAgICsgKDEgfCBDb3VudHJ5L1NpdGUvUmVsaWdpb24pLAogICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19vbWl0KQoKcjEzX3NwZXYgPC0gbG1lcihgU3Bpcml0dWFsIEV2ZW50c2AgfiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgIyArICgxICsgQWJzb3JwdGlvbiB8IENvdW50cnkvU2l0ZS9SZWxpZ2lvbiksCiAgICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkvU2l0ZS9SZWxpZ2lvbiksCiAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX29taXQpCgpyMTRfc3BldiA8LSBsbWVyKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogQWJzb3JwdGlvbiAKICAgICAgICAgICAgICAgICAjICsgKDEgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIEFic29ycHRpb24gfCBDb3VudHJ5L1NpdGUvUmVsaWdpb24pLAogICAgICAgICAgICAgICAgICMgKyAoMSArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICsgQWJzb3JwdGlvbiB8IENvdW50cnkvU2l0ZS9SZWxpZ2lvbiksCiAgICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkvU2l0ZS9SZWxpZ2lvbiksCiAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX29taXQpCgpyMTVfc3BldiA8LSBsbWVyKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlICsgRWR1Y2F0aW9uCiAgICAgICAgICAgICAgICAgIyArICgxICsgYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBBYnNvcnB0aW9uIHwgQ291bnRyeS9TaXRlL1JlbGlnaW9uKSwKICAgICAgICAgICAgICAgICAjICsgKDEgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCArIEFic29ycHRpb24gfCBDb3VudHJ5L1NpdGUvUmVsaWdpb24pLAogICAgICAgICAgICAgICAgICsgKDEgfCBDb3VudHJ5L1NpdGUvUmVsaWdpb24pLAogICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19vbWl0KQpgYGAKCmBgYHtyLCBpbmNsdWRlID0gRn0KIyBydW4gbWFudWFsbHkgdG8gY2hlY2sgY29udmVyZ2VuY2UKc3VtbWFyeShyMTFfc3BldikKc3VtbWFyeShyMTJfc3BldikKc3VtbWFyeShyMTNfc3BldikKc3VtbWFyeShyMTRfc3BldikKc3VtbWFyeShyMTVfc3BldikKYGBgCgpgYGB7ciwgaW5jbHVkZT1GfQp0YWJsZV9zMjEgPC0gc3RhcmdhemVyKCNyMDRfc3BldiwgcjA1X3NwZXYsIHIwNl9zcGV2LCAKICByMTFfc3BldiwgcjEyX3NwZXYsIHIxM19zcGV2LCByMTRfc3BldiwgcjE1X3NwZXYsCiAgdHlwZSA9ICJodG1sIiwKICBjaSA9IFQsCiAgcmVwb3J0ID0gYygidmNzcCIpLAogIGRpZ2l0cyA9IDIsCiAgZGlnaXRzLmV4dHJhID0gMTAwMCwKICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgVmlnbmV0dGVzYCQiLAogICAgICAgICAgICAiXkFic29ycHRpb24kIiwKICAgICAgICAgICAgIl5gUG9yb3NpdHkgVmlnbmV0dGVzYDpBYnNvcnB0aW9uJCIpLAogICMgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgZGVwLnZhci5jYXB0aW9uID0gIiIsCiAgc2luZ2xlLnJvdyA9IFQpCgpjYXQoc3ViX2ludGVyYWN0X2Z1bih0YWJsZV9zMjEpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MyMS5odG1sIikKYGBgCgpgYGB7cn0KaHRtbHRvb2xzOjppbmNsdWRlSFRNTCgiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MyMS5odG1sIikKYGBgCgpgYGB7cn0KcnNxX3RhYmxlX2Z1bihsaXN0KHIxMV9zcGV2LCByMTJfc3BldiwgcjEzX3NwZXYsIHIxNF9zcGV2LCByMTVfc3BldikpCmBgYAoKCiMjIFN0dWR5IDMKCmBgYHtyfQpkM19hYnNfb21pdCA8LSBkM19ieXEgJT4lCiAgc2VsZWN0KHN1YmosIGN0cnksIHF1ZXN0aW9uLCByZXNwb25zZSkgJT4lCiAgZmlsdGVyKHF1ZXN0aW9uICVpbiUgYygiZXh3bF8wMSIsICJleHdsXzAyIiwgImV4d2xfMDMiLCAiZXh3bF8wNCIsICJleHdsXzA1IiwgImV4d2xfMDYiLAogICAgICAgICAgICAgICAgICAgICAgICAgImV4d2xfMDciLCAiZXh3bF8wOCIsICJleHdsXzA5IiwgImV4d2xfMTAiLCAiZXh3bF8xMSIsICJleHdsXzEyIiwKICAgICAgICAgICAgICAgICAgICAgICAgICJleHdsXzEzIiwgImV4d2xfMTQiLCAiZXh3bF8xNSIsICJleHdsXzE2IiwgImV4d2xfMTciLCAiZXh3bF8xOCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAiZXh3bF8xOSIsICJleHdsXzIwIiwgImV4d2xfMjEiLCAiZXh3bF8yMiIsICJleHdsXzIzIiwgImV4d2xfMjQiLAogICAgICAgICAgICAgICAgICAgICAgICAgImV4d2xfMjUiLCAiZXh3bF8yNiIsICJleHdsXzI3IiwgImV4d2xfMjgiLCAiZXh3bF8yOSIsICJleHdsXzMwIiwKICAgICAgICAgICAgICAgICAgICAgICAgICJleHdsXzMxIiwgImV4d2xfMzIiLCAiZXh3bF8zMyIsICJleHdsXzM0IikpICU+JQogIGZpbHRlcihxdWVzdGlvbiAhPSAiZXh3bF8xNCIsIHF1ZXN0aW9uICE9ICJleHdsXzMxIikgJT4lCiAgZ3JvdXBfYnkoc3ViaiwgY3RyeSkgJT4lCiAgc3VtbWFyaXNlKEFic29ycHRpb24gPSBtZWFuKHJlc3BvbnNlLCBuYS5ybSA9IFQpKSAlPiUKICB1bmdyb3VwKCkgJT4lCiAgZ3JvdXBfYnkoY3RyeSkgJT4lCiAgbXV0YXRlKEFic29ycHRpb24gPSBzY2FsZShBYnNvcnB0aW9uKSkgJT4lCiAgdW5ncm91cCgpICU+JQogIGRpc3RpbmN0KHN1YmosIEFic29ycHRpb24pICU+JQogIHJlbmFtZShzdWJqZWN0X2lkID0gc3ViaikgJT4lCiAgcmlnaHRfam9pbihkM19mb3J0YWIgJT4lIHNlbGVjdCgtQWJzb3JwdGlvbikpICU+JQogIGZpbHRlcihzdWJqZWN0X2lkICVpbiUgZDNfZm9ydGFiJHN1YmplY3RfaWQpCmBgYAoKIyMjIFRhYmxlIFMzMi4gU3R1ZHkgMywgU3Bpcml0dWFsIEV2ZW50cyBhbmQgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2U6IHJlbGF0aW9uc2hpcHMgd2l0aCBBYnNvcnB0aW9uIChzYW1wbGUgYXMgZml4ZWQgZWZmZWN0KQoKYGBge3J9CnIwM19zcGV2IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBBYnNvcnB0aW9uYCwKICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19vbWl0KQoKcjA0X3NwZXYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIGBBYnNvcnB0aW9uYCwKICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19vbWl0KQoKcjA1X3NwZXYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIGBBYnNvcnB0aW9uYAogICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSwgIAogICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX29taXQpCmBgYAoKYGBge3IsIGluY2x1ZGUgPSBGfQojIHJ1biBtYW51YWxseSB0byBjaGVjayBjb252ZXJnZW5jZQpzdW1tYXJ5KHIwM19zcGV2KQpzdW1tYXJ5KHIwNF9zcGV2KQpzdW1tYXJ5KHIwNV9zcGV2KQpgYGAKCmBgYHtyfQpyMDNfZHNlIDwtIGxtKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgIH4gYEFic29ycHRpb25gLAogICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfb21pdCkKCnIwNF9kc2UgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBDb3VudHJ5ICogYEFic29ycHRpb25gLAogICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfb21pdCkKCnIwNV9kc2UgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBDb3VudHJ5ICogYEFic29ycHRpb25gCiAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UsICAKICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX29taXQpCmBgYAoKYGBge3IsIGluY2x1ZGUgPSBGfQojIHJ1biBtYW51YWxseSB0byBjaGVjayBjb252ZXJnZW5jZQpzdW1tYXJ5KHIwM19kc2UpCnN1bW1hcnkocjA0X2RzZSkKc3VtbWFyeShyMDVfZHNlKQpgYGAKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zMzIgPC0gc3RhcmdhemVyKHIwM19zcGV2LCByMDRfc3BldiwgcjA1X3NwZXYsIHIwM19kc2UsIHIwNF9kc2UsIHIwNV9kc2UsIAogICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeQWJzb3JwdGlvbiQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczMyKSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzIuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzIuaHRtbCIpCmBgYAoKIyMjIFRhYmxlIFMzMy4gU3R1ZHkgMywgU3Bpcml0dWFsIEV2ZW50cyBhbmQgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2U6IHJlbGF0aW9uc2hpcHMgd2l0aCBBYnNvcnB0aW9uIChzYW1wbGUgYXMgcmFuZG9tIGVmZmVjdCkKCmBgYHtyfQpyMDZfc3BldiA8LSBsbWVyKGBTcGlyaXR1YWwgRXZlbnRzYCB+IDEgCiAgICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkpLAogICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19vbWl0KQoKcjA3X3NwZXYgPC0gbG1lcihgU3Bpcml0dWFsIEV2ZW50c2AgfiBgQWJzb3JwdGlvbmAgCiAgICAgICAgICAgICAgICAgIyArICgxICsgYEFic29ycHRpb25gIHwgQ291bnRyeSksICMgcGVyZmVjdGx5IGNvcnJlbGF0ZWQgcmFuZngKICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeSksCiAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX29taXQpCgpyMDhfc3BldiA8LSBsbWVyKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBBYnNvcnB0aW9uYAogICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlIAogICAgICAgICAgICAgICAgICMgKyAoMSArIGBBYnNvcnB0aW9uYCArIEdlbmRlciArIEFnZSB8IENvdW50cnkpLCAjIHBlcmZlY3RseSBjb3JyZWxhdGVkIHJhbmZ4CiAgICAgICAgICAgICAgICAgIyArICgxICsgYEFic29ycHRpb25gIHwgQ291bnRyeSksICMgcGVyZmVjdGx5IGNvcnJlbGF0ZWQgcmFuZngKICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeSksCiAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX29taXQpCmBgYAoKYGBge3IsIGluY2x1ZGUgPSBGfQojIHJ1biBtYW51YWxseSB0byBjaGVjayBjb252ZXJnZW5jZQpzdW1tYXJ5KHIwNl9zcGV2KQpzdW1tYXJ5KHIwN19zcGV2KQpzdW1tYXJ5KHIwOF9zcGV2KQpgYGAKCmBgYHtyfQpyMDZfZHNlIDwtIGxtZXIoYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiAxIAogICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkpLAogICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfb21pdCkKCnIwN19kc2UgPC0gbG1lcihgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IGBBYnNvcnB0aW9uYCAKICAgICAgICAgICAgICAgICMgKyAoMSArIGBBYnNvcnB0aW9uYCB8IENvdW50cnkpLCAjIHBlcmZlY3RseSBjb3JyZWxhdGVkIHJhbmZ4CiAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeSksCiAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19vbWl0KQoKcjA4X2RzZSA8LSBsbWVyKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgIH4gYEFic29ycHRpb25gCiAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSAKICAgICAgICAgICAgICAgICMgKyAoMSArIGBBYnNvcnB0aW9uYCArIEdlbmRlciArIEFnZSB8IENvdW50cnkpLCAKICAgICAgICAgICAgICAgICMgKyAoMSArIGBBYnNvcnB0aW9uYCB8IENvdW50cnkpLAogICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkpLCAjIHVzZSB0aGlzIGZvciBjb21wYXJzaW9uIHdpdGggc3BldgogICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfb21pdCkKYGBgCgpgYGB7ciwgaW5jbHVkZSA9IEZ9CiMgcnVuIG1hbnVhbGx5IHRvIGNoZWNrIGNvbnZlcmdlbmNlCnN1bW1hcnkocjA2X2RzZSkKc3VtbWFyeShyMDdfZHNlKQpzdW1tYXJ5KHIwOF9kc2UpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3MzMyA8LSBzdGFyZ2F6ZXIocjA2X3NwZXYsIHIwN19zcGV2LCByMDhfc3BldiwgcjA2X2RzZSwgcjA3X2RzZSwgcjA4X2RzZSwKICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAwODAwLAogICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBBYnNvcnB0aW9uYCQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczMzKSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzMuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzMuaHRtbCIpCmBgYAoKYGBge3J9CnJzcV90YWJsZV9mdW4obGlzdChyMDZfc3BldiwgcjA3X3NwZXYsIHIwOF9zcGV2LCByMDZfZHNlLCByMDdfZHNlLCByMDhfZHNlKSkKYGBgCgojIyMgVGFibGUgUzM0LiBTdHVkeSAzLCBTcGlyaXR1YWwgRXZlbnRzOiByZWxhdGlvbnNoaXBzIHdpdGggQWJzb3JwdGlvbiBieSBjb3VudHJ5CgpgYGB7cn0KcjA5X3VzX3NwZXYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gYEFic29ycHRpb25gLAogICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX29taXQgJT4lIAogICAgICAgICAgICAgICAgICAgIGZpbHRlcihDb3VudHJ5ID09ICJVUyIpICU+JQogICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKGBTcGlyaXR1YWwgRXZlbnRzYCwgYEFic29ycHRpb25gKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgfiBzY2FsZSguKSkpCgpyMDlfZ2hfc3BldiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgQWJzb3JwdGlvbmAsCiAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfb21pdCAlPiUgCiAgICAgICAgICAgICAgICAgICAgZmlsdGVyKENvdW50cnkgPT0gIkdoYW5hIikgJT4lCiAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoYFNwaXJpdHVhbCBFdmVudHNgLCBgQWJzb3JwdGlvbmApLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICB+IHNjYWxlKC4pKSkKCnIwOV90aF9zcGV2IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBBYnNvcnB0aW9uYCwKICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19vbWl0ICU+JSAKICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQ291bnRyeSA9PSAiVGhhaWxhbmQiKSAlPiUKICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhgU3Bpcml0dWFsIEV2ZW50c2AsIGBBYnNvcnB0aW9uYCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIH4gc2NhbGUoLikpKQoKcjA5X2NoX3NwZXYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gYEFic29ycHRpb25gLAogICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX29taXQgJT4lIAogICAgICAgICAgICAgICAgICAgIGZpbHRlcihDb3VudHJ5ID09ICJDaGluYSIpICU+JQogICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKGBTcGlyaXR1YWwgRXZlbnRzYCwgYEFic29ycHRpb25gKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgfiBzY2FsZSguKSkpCgpyMDlfdnRfc3BldiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgQWJzb3JwdGlvbmAsCiAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfb21pdCAlPiUgCiAgICAgICAgICAgICAgICAgICAgZmlsdGVyKENvdW50cnkgPT0gIlZhbnVhdHUiKSAlPiUKICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhgU3Bpcml0dWFsIEV2ZW50c2AsIGBBYnNvcnB0aW9uYCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIH4gc2NhbGUoLikpKQpgYGAKCmBgYHtyLCBpbmNsdWRlID0gRn0KIyBydW4gbWFudWFsbHkgdG8gY2hlY2sgY29udmVyZ2VuY2UKc3VtbWFyeShyMDlfdXNfc3BldikKc3VtbWFyeShyMDlfZ2hfc3BldikKc3VtbWFyeShyMDlfdGhfc3BldikKc3VtbWFyeShyMDlfY2hfc3BldikKc3VtbWFyeShyMDlfdnRfc3BldikKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczM0IDwtIHN0YXJnYXplcihyMDlfdXNfc3BldiwgcjA5X2doX3NwZXYsIHIwOV90aF9zcGV2LCByMDlfY2hfc3BldiwgcjA5X3Z0X3NwZXYsIAogICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeYEFic29ycHRpb25gJCIpLAogICAgICAgICAgICAgICAgICAgICAgICMgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgICAgICAgICAgICAgICAgICAgICAgZGVwLnZhci5jYXB0aW9uID0gIiIsCiAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpCgpjYXQoc3ViX2ludGVyYWN0X2Z1bih0YWJsZV9zMzQpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MzNC5odG1sIikKYGBgCgpgYGB7cn0KaHRtbHRvb2xzOjppbmNsdWRlSFRNTCgiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MzNC5odG1sIikKYGBgCgojIyMgVGFibGUgUzM1LiBTdHVkeSAzLCBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZTogcmVsYXRpb25zaGlwcyB3aXRoIEFic29ycHRpb24gYnkgY291bnRyeQoKYGBge3J9CnIwOV91c19kc2UgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBgQWJzb3JwdGlvbmAsCiAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19vbWl0ICU+JSAKICAgICAgICAgICAgICAgICAgIGZpbHRlcihDb3VudHJ5ID09ICJVUyIpICU+JQogICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AsIGBBYnNvcnB0aW9uYCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgfiBzY2FsZSguKSkpCgpyMDlfZ2hfZHNlIDwtIGxtKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgIH4gYEFic29ycHRpb25gLAogICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfb21pdCAlPiUgCiAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQ291bnRyeSA9PSAiR2hhbmEiKSAlPiUKICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgLCBgQWJzb3JwdGlvbmApLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgIH4gc2NhbGUoLikpKQoKcjA5X3RoX2RzZSA8LSBsbShgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IGBBYnNvcnB0aW9uYCwKICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX29taXQgJT4lIAogICAgICAgICAgICAgICAgICAgZmlsdGVyKENvdW50cnkgPT0gIlRoYWlsYW5kIikgJT4lCiAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCwgYEFic29ycHRpb25gKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICB+IHNjYWxlKC4pKSkKCnIwOV9jaF9kc2UgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBgQWJzb3JwdGlvbmAsCiAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19vbWl0ICU+JSAKICAgICAgICAgICAgICAgICAgIGZpbHRlcihDb3VudHJ5ID09ICJDaGluYSIpICU+JQogICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AsIGBBYnNvcnB0aW9uYCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgfiBzY2FsZSguKSkpCgpyMDlfdnRfZHNlIDwtIGxtKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgIH4gYEFic29ycHRpb25gLAogICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfb21pdCAlPiUgCiAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQ291bnRyeSA9PSAiVmFudWF0dSIpICU+JQogICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AsIGBBYnNvcnB0aW9uYCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgfiBzY2FsZSguKSkpCmBgYAoKYGBge3IsIGluY2x1ZGUgPSBGfQojIHJ1biBtYW51YWxseSB0byBjaGVjayBjb252ZXJnZW5jZQpzdW1tYXJ5KHIwOV91c19kc2UpCnN1bW1hcnkocjA5X2doX2RzZSkKc3VtbWFyeShyMDlfdGhfZHNlKQpzdW1tYXJ5KHIwOV9jaF9kc2UpCnN1bW1hcnkocjA5X3Z0X2RzZSkKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczM1IDwtIHN0YXJnYXplcihyMDlfdXNfZHNlLCByMDlfZ2hfZHNlLCByMDlfdGhfZHNlLCByMDlfY2hfZHNlLCByMDlfdnRfZHNlLCAKICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBBYnNvcnB0aW9uYCQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczM1KSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzUuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzUuaHRtbCIpCmBgYAoKIyMgU3R1ZHkgNAoKIyMgUmVsYXRpb25zaGlwczogU3Bpcml0dWFsIHByZXNlbmNlIGV2ZW50cwoKYGBge3J9CmQ0X2Fic19vbWl0IDwtIGQ0X2J5cSAlPiUKICBzZWxlY3QocDdfc3ViaiwgcDdfY3RyeSwgY29udGFpbnMoIl9hYnNfIikpICU+JQogIHNlbGVjdCgtZW5kc193aXRoKCJjYXQiKSwgLWVuZHNfd2l0aCgidG90YWwiKSwgLWNvbnRhaW5zKCJfY2hlY2siKSkgJT4lCiAgc2VsZWN0KC1wN19hYnNfc2Vuc2UucHJlc2MsIC1wN19hYnNfbm90LnBoeXNpY2FsKSAlPiUKICBnYXRoZXIocXVlc3Rpb24sIHJlc3BvbnNlLCAtcDdfc3ViaiwgLXA3X2N0cnkpICU+JQogIGdyb3VwX2J5KHA3X3N1YmosIHA3X2N0cnkpICU+JQogIHN1bW1hcmlzZShBYnNvcnB0aW9uID0gbWVhbihyZXNwb25zZSwgbmEucm0gPSBUKSkgJT4lCiAgdW5ncm91cCgpICU+JQogIGdyb3VwX2J5KHA3X2N0cnkpICU+JQogIG11dGF0ZShBYnNvcnB0aW9uID0gc2NhbGUoQWJzb3JwdGlvbikpICU+JQogIHVuZ3JvdXAoKSAlPiUKICBkaXN0aW5jdChwN19zdWJqLCBBYnNvcnB0aW9uKSAlPiUKICByZW5hbWUoc3ViamVjdF9pZCA9IHA3X3N1YmopICU+JQogIHJpZ2h0X2pvaW4oZDRfZm9ydGFiICU+JSBzZWxlY3QoLUFic29ycHRpb24pKSAlPiUKICBmaWx0ZXIoc3ViamVjdF9pZCAlaW4lIGQ0X2ZvcnRhYiRzdWJqZWN0X2lkKQpgYGAKCmBgYHtyfQojIGxvbmdmb3JtIGRhdGFmcmFtZQpkNF9mb3J0YWJfbG9uZ19zcGlyaXQgPC0gZDRfYWJzX29taXQgJT4lIAogIGdhdGhlcihTY2FsZSwgU2NvcmUsIAogICAgICAgICBjKGBTcGlyaXR1YWwgRXZlbnRzYCwgYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlYCkpICU+JQogIG11dGF0ZShTY2FsZSA9IGZhY3RvcihTY2FsZSkpCmBgYAoKYGBge3J9CiMgc2V0IGNvbnRyYXN0cwpjb250cmFzdHMoZDRfZm9ydGFiX2xvbmdfc3Bpcml0JENvdW50cnkpIDwtIGNiaW5kKCI6IEdoLiIgPSBjKC0xLCAxLCAwLCAwLCAwKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiOiBUaC4iID0gYygtMSwgMCwgMSwgMCwgMCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjogQ2guIiA9IGMoLTEsIDAsIDAsIDEsIDApLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI6IFZhLiIgPSBjKC0xLCAwLCAwLCAwLCAxKSkKY29udHJhc3RzKGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCRHZW5kZXIpIDwtIGNiaW5kKCI6IG1hbGUiID0gYygtMSwgMSkpCmNvbnRyYXN0cyhkNF9mb3J0YWJfbG9uZ19zcGlyaXQkU2NhbGUpIDwtIGNiaW5kKCI6IFNwaXJpdHVhbCBFdmVudHMiID0gYygtMSwgMSkpCmBgYAoKCiMjIyBUYWJsZSBTNDAuIFN0dWR5IDQsIG1lYXN1cmVzIG9mIHNwaXJpdHVhbCBwcmVzZW5jZSBldmVudHM6IHJlbGF0aW9uc2hpcHMgd2l0aCBQb3Jvc2l0eSBWaWduZXR0ZXMgYW5kIEFic29ycHRpb24gKHNhbXBsZSBhcyBmaXhlZCBlZmZlY3QpCgpgYGB7cn0KcjAzX3NwaXJpdCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYAogICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQpCgpyMDRfc3Bpcml0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBTY2FsZWAKICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc3Bpcml0KQoKcjA1X3NwaXJpdCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCkKCnIwNl9zcGlyaXQgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgCiAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCkKCnIwN19zcGlyaXQgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBTY2FsZWAKICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc3Bpcml0KQoKcjA4X3NwaXJpdCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQpCgpyMDlfc3Bpcml0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIEFic29ycHRpb24KICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc3Bpcml0KQoKcjEwX3NwaXJpdCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFNjYWxlYCAqIEFic29ycHRpb24KICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc3Bpcml0KQoKcjExX3NwaXJpdCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZQogICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQpCgpyMTJfc3Bpcml0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgU2NhbGVgICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc3Bpcml0KQpgYGAKCmBgYHtyLCBpbmNsdWRlID0gRn0KIyBydW4gbWFudWFsbHkgdG8gY2hlY2sgY29udmVyZ2VuY2UKc3VtbWFyeShyMDNfc3Bpcml0KQpzdW1tYXJ5KHIwNF9zcGlyaXQpCnN1bW1hcnkocjA1X3NwaXJpdCkKc3VtbWFyeShyMDZfc3Bpcml0KQpzdW1tYXJ5KHIwN19zcGlyaXQpCnN1bW1hcnkocjA4X3NwaXJpdCkKc3VtbWFyeShyMDlfc3Bpcml0KQpzdW1tYXJ5KHIxMF9zcGlyaXQpCnN1bW1hcnkocjExX3NwaXJpdCkKc3VtbWFyeShyMTJfc3Bpcml0KQpgYGAKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zNDAgPC0gc3RhcmdhemVyKHIwM19zcGlyaXQsICNyMDRfc3Bpcml0LCAKICAgICAgICAgICAgICAgICAgICAgICByMDVfc3Bpcml0LCByMDZfc3Bpcml0LCAjcjA3X3NwaXJpdCwgCiAgICAgICAgICAgICAgICAgICAgICAgcjA4X3NwaXJpdCwgcjA5X3NwaXJpdCwgI3IxMF9zcGlyaXQsCiAgICAgICAgICAgICAgICAgICAgICAgcjExX3NwaXJpdCwgI3IxMl9zcGlyaXQsIAogICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeYFBvcm9zaXR5IFZpZ25ldHRlc2AkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5BYnNvcnB0aW9uJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFZpZ25ldHRlc2A6QWJzb3JwdGlvbiQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKSAKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3M0MCksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQwLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQwLmh0bWwiKQpgYGAKCmBgYHtyfQpyc3FfdGFibGVfZnVuKGxpc3QocjAzX3NwaXJpdCwgI3IwNF9zcGlyaXQsIAogICAgICAgICAgICAgICAgICAgcjA1X3NwaXJpdCwgcjA2X3NwaXJpdCwgI3IwN19zcGlyaXQsIAogICAgICAgICAgICAgICAgICAgcjA4X3NwaXJpdCwgcjA5X3NwaXJpdCwgI3IxMF9zcGlyaXQsCiAgICAgICAgICAgICAgICAgICByMTFfc3Bpcml0ICMsIHIxMl9zcGlyaXQgCikpCmBgYAoKIyMjIFRhYmxlIFM0MS4gU3R1ZHkgNCwgbWVhc3VyZXMgb2Ygc3Bpcml0dWFsIHByZXNlbmNlIGV2ZW50czogcmVsYXRpb25zaGlwcyB3aXRoIFBvcm9zaXR5IFNjYWxlIGFuZCBBYnNvcnB0aW9uIChzYW1wbGUgYXMgZml4ZWQgZWZmZWN0KQoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0MSA8LSBzdGFyZ2F6ZXIoI3IwM19zcGlyaXQsIAogIHIwNF9zcGlyaXQsIHIwNV9zcGlyaXQsICNyMDZfc3Bpcml0LAogIHIwN19zcGlyaXQsIHIwOF9zcGlyaXQsICNyMDlfc3Bpcml0LCAKICByMTBfc3Bpcml0LCAjcjExX3NwaXJpdCwgCiAgcjEyX3NwaXJpdCwgCiAgdHlwZSA9ICJodG1sIiwKICBjaSA9IFQsCiAgcmVwb3J0ID0gYygidmNzcCIpLAogIGRpZ2l0cyA9IDIsCiAgZGlnaXRzLmV4dHJhID0gMTAwMCwKICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgU2NhbGVgJCIsCiAgICAgICAgICAgICJeQWJzb3JwdGlvbiQiLAogICAgICAgICAgICAiXmBQb3Jvc2l0eSBTY2FsZWA6QWJzb3JwdGlvbiQiKSwKICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogIHNpbmdsZS5yb3cgPSBUKSAKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3M0MSksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQxLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQxLmh0bWwiKQpgYGAKCmBgYHtyfQpyc3FfdGFibGVfZnVuKGxpc3QoI3IwM19zcGlyaXQsIAogIHIwNF9zcGlyaXQsIHIwNV9zcGlyaXQsICNyMDZfc3Bpcml0LAogIHIwN19zcGlyaXQsIHIwOF9zcGlyaXQsICNyMDlfc3Bpcml0LCAKICByMTBfc3Bpcml0LCAjcjExX3NwaXJpdCwgCiAgcjEyX3NwaXJpdCkpCmBgYAoKIyMjIFRhYmxlIFM0Mi4gU3R1ZHkgNCwgbWVhc3VyZXMgb2Ygc3Bpcml0dWFsIHByZXNlbmNlIGV2ZW50czogcmVsYXRpb25zaGlwcyB3aXRoIFBvcm9zaXR5IFZpZ25ldHRlcyBhbmQgQWJzb3JwdGlvbiAoc2FtcGxlIGFzIHJhbmRvbSBlZmZlY3QpCgpgYGB7cn0KcjEzX3NwaXJpdCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUKICAgICAgICAgICAgICAgICAgICsgKDEgfCBDb3VudHJ5L3N1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQpCgpyMTRfc3Bpcml0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgCiAgICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeS9zdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICMgKyAoMSArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgIHwgQ291bnRyeSksICMgYWRkaW5nIHRvIGFib3ZlLCBmYWlsZWQgdG8gY29udmVyZ2UKICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc3Bpcml0KQoKcjE1X3NwaXJpdCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgU2NhbGVgCiAgICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeS9zdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICMgKyAoMSArIGBQb3Jvc2l0eSBTY2FsZWAgfCBDb3VudHJ5KSwgIyBhZGRpbmcgdG8gYWJvdmUsIHBlcmZlY3RseSBjb3JyZWxhdGVkIHJhbmZ4CiAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCkKCnIxNl9zcGlyaXQgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkvc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAjICsgKDEgKyBBYnNvcnB0aW9uIHwgQ291bnRyeSksICMgYWRkaW5nIHRvIGFib3ZlLCBwZXJmZWN0bHkgY29ycmVsYXRlZCByYW5meAogICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQpCgpyMTdfc3Bpcml0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkvc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAjICsgKDEgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIEFic29ycHRpb24gfCBDb3VudHJ5KSwgIyBhZGRpbmcgdG8gYWJvdmUsIHBlcmZlY3RseSBjb3JyZWxhdGVkIHJhbmZ4CiAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCkKCnIxOF9zcGlyaXQgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFNjYWxlYCAqIEFic29ycHRpb24KICAgICAgICAgICAgICAgICAgICsgKDEgfCBDb3VudHJ5L3N1YmplY3RfaWQpLCAKICAgICAgICAgICAgICAgICAgICMgKyAoMSArIGBQb3Jvc2l0eSBTY2FsZWAgKiBBYnNvcnB0aW9uIHwgQ291bnRyeSksICMgYWRkaW5nIHRvIGFib3ZlLCBwZXJmZWN0bHkgY29ycmVsYXRlZCByYW5meAogICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQpCgpyMTlfc3Bpcml0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICsgKDEgfCBDb3VudHJ5L3N1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgIyArICgxICsgYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBBYnNvcnB0aW9uICsgR2VuZGVyICsgQWdlIHwgQ291bnRyeSksCiAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCkKCnIyMF9zcGlyaXQgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFNjYWxlYCAqIEFic29ycHRpb24KICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlCiAgICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeS9zdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICMgKyAoMSArIGBQb3Jvc2l0eSBTY2FsZWAgKiBBYnNvcnB0aW9uICsgR2VuZGVyICsgQWdlIHwgQ291bnRyeSksCiAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCkKYGBgCgpgYGB7ciwgaW5jbHVkZSA9IEZ9CiMgcnVuIG1hbnVhbGx5IHRvIGNoZWNrIGNvbnZlcmdlbmNlCnN1bW1hcnkocjEzX3NwaXJpdCkKc3VtbWFyeShyMTRfc3Bpcml0KQpzdW1tYXJ5KHIxNV9zcGlyaXQpCnN1bW1hcnkocjE2X3NwaXJpdCkKc3VtbWFyeShyMTdfc3Bpcml0KQpzdW1tYXJ5KHIxOF9zcGlyaXQpCnN1bW1hcnkocjE5X3NwaXJpdCkKc3VtbWFyeShyMjBfc3Bpcml0KQpgYGAKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zNDIgPC0gc3RhcmdhemVyKHIxM19zcGlyaXQsIHIxNF9zcGlyaXQsICNyMTVfc3Bpcml0LAogICAgICAgICAgICAgICAgICAgICAgIHIxNl9zcGlyaXQsIHIxN19zcGlyaXQsICNyMThfc3Bpcml0LAogICAgICAgICAgICAgICAgICAgICAgIHIxOV9zcGlyaXQsICNyMjBfc3Bpcml0LAogICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeYFBvcm9zaXR5IFZpZ25ldHRlc2AkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5BYnNvcnB0aW9uJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFZpZ25ldHRlc2A6QWJzb3JwdGlvbiQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQyKSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDIuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDIuaHRtbCIpCmBgYAoKYGBge3J9CnJzcV90YWJsZV9mdW4obGlzdChyMTNfc3Bpcml0LCByMTRfc3Bpcml0LCAjcjE1X3NwaXJpdCwKICAgICAgICAgICAgICAgICAgIHIxNl9zcGlyaXQsIHIxN19zcGlyaXQsICNyMThfc3Bpcml0LAogICAgICAgICAgICAgICAgICAgcjE5X3NwaXJpdCAjLCByMjBfc3Bpcml0CikpCmBgYAoKIyMjIFRhYmxlIFM0My4gU3R1ZHkgNCwgbWVhc3VyZXMgb2Ygc3Bpcml0dWFsIHByZXNlbmNlIGV2ZW50czogcmVsYXRpb25zaGlwcyB3aXRoIFBvcm9zaXR5IFNjYWxlIGFuZCBBYnNvcnB0aW9uIChzYW1wbGUgYXMgcmFuZG9tIGVmZmVjdCkKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zNDMgPC0gc3RhcmdhemVyKHIxM19zcGlyaXQsICNyMTRfc3Bpcml0LCAKICAgICAgICAgICAgICAgICAgICAgICByMTVfc3Bpcml0LCByMTZfc3Bpcml0LCAjcjE3X3NwaXJpdCwgCiAgICAgICAgICAgICAgICAgICAgICAgcjE4X3NwaXJpdCwgI3IxOV9zcGlyaXQsIAogICAgICAgICAgICAgICAgICAgICAgIHIyMF9zcGlyaXQsCiAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICBjaSA9IFQsCiAgICAgICAgICAgICAgICAgICAgICAgcmVwb3J0ID0gYygidmNzcCIpLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzLmV4dHJhID0gMTAwMCwKICAgICAgICAgICAgICAgICAgICAgICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgU2NhbGVgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeQWJzb3JwdGlvbiQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBTY2FsZWA6QWJzb3JwdGlvbiQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQzKSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDMuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDMuaHRtbCIpCmBgYAoKYGBge3J9CnJzcV90YWJsZV9mdW4obGlzdChyMTNfc3Bpcml0LCAjcjE0X3NwaXJpdCwgCiAgICAgICAgICAgICAgICAgICByMTVfc3Bpcml0LCByMTZfc3Bpcml0LCAjcjE3X3NwaXJpdCwgCiAgICAgICAgICAgICAgICAgICByMThfc3Bpcml0LCAjcjE5X3NwaXJpdCAKICAgICAgICAgICAgICAgICAgIHIyMF9zcGlyaXQKKSkKYGBgCgojIyMgVGFibGUgUzQ0LiBTdHVkeSA0LCBtZWFzdXJlcyBvZiBzcGlyaXR1YWwgcHJlc2VuY2UgZXZlbnRzOiByZWxhdGlvbnNoaXBzIHdpdGggUG9yb3NpdHkgVmlnbmV0dGVzIGJ5IGNvdW50cnkKCmBgYHtyfQpyMjFfc3Bpcml0X3VzIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJVUyIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYFBvcm9zaXR5IFZpZ25ldHRlc2ApLCB+IHNjYWxlKC4pKSkKCnIyMV9zcGlyaXRfZ2ggPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgCiAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCAlPiUgZmlsdGVyKENvdW50cnkgPT0gIkdoYW5hIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCAsYFBvcm9zaXR5IFZpZ25ldHRlc2ApLCB+IHNjYWxlKC4pKSkKCnIyMV9zcGlyaXRfdGggPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgCiAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCAlPiUgZmlsdGVyKENvdW50cnkgPT0gIlRoYWlsYW5kIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgUG9yb3NpdHkgVmlnbmV0dGVzYCksIH4gc2NhbGUoLikpKQoKcjIxX3NwaXJpdF9jaCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAKICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc3Bpcml0ICU+JSBmaWx0ZXIoQ291bnRyeSA9PSAiQ2hpbmEiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBQb3Jvc2l0eSBWaWduZXR0ZXNgKSwgfiBzY2FsZSguKSkpCgpyMjFfc3Bpcml0X3Z0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJWYW51YXR1IikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgUG9yb3NpdHkgVmlnbmV0dGVzYCksIH4gc2NhbGUoLikpKQpgYGAKCmBgYHtyLCBpbmNsdWRlID0gRn0KIyBydW4gbWFudWFsbHkgdG8gY2hlY2sgY29udmVyZ2VuY2UKc3VtbWFyeShyMjFfc3Bpcml0X3VzKQpzdW1tYXJ5KHIyMV9zcGlyaXRfZ2gpCnN1bW1hcnkocjIxX3NwaXJpdF90aCkKc3VtbWFyeShyMjFfc3Bpcml0X2NoKQpzdW1tYXJ5KHIyMV9zcGlyaXRfdnQpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0NCA8LSBzdGFyZ2F6ZXIocjIxX3NwaXJpdF91cywgcjIxX3NwaXJpdF9naCwgcjIxX3NwaXJpdF90aCwgCiAgICAgICAgICAgICAgICAgICAgICAgcjIxX3NwaXJpdF9jaCwgcjIxX3NwaXJpdF92dCwgCiAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICBjaSA9IFQsCiAgICAgICAgICAgICAgICAgICAgICAgcmVwb3J0ID0gYygidmNzcCIpLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzLmV4dHJhID0gMTAwMCwKICAgICAgICAgICAgICAgICAgICAgICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgVmlnbmV0dGVzYCQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQ0KSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDQuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDQuaHRtbCIpCmBgYAoKYGBge3J9CnJzcV90YWJsZV9mdW4obGlzdChyMjFfc3Bpcml0X3VzLCByMjFfc3Bpcml0X2doLCByMjFfc3Bpcml0X3RoLCAKICAgICAgICAgICAgICAgICAgIHIyMV9zcGlyaXRfY2gsIHIyMV9zcGlyaXRfdnQpKQpgYGAKCiMjIyBUYWJsZSBTNDUuIFN0dWR5IDQsIG1lYXN1cmVzIG9mIHNwaXJpdHVhbCBwcmVzZW5jZSBldmVudHM6IHJlbGF0aW9uc2hpcHMgd2l0aCBQb3Jvc2l0eSBTY2FsZSBieSBjb3VudHJ5CgpgYGB7cn0KcjIyX3NwaXJpdF91cyA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgU2NhbGVgIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJVUyIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYFBvcm9zaXR5IFNjYWxlYCksIH4gc2NhbGUoLikpKQoKcjIyX3NwaXJpdF9naCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgU2NhbGVgIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJHaGFuYSIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYFBvcm9zaXR5IFNjYWxlYCksIH4gc2NhbGUoLikpKQoKcjIyX3NwaXJpdF90aCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgU2NhbGVgIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJUaGFpbGFuZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYFBvcm9zaXR5IFNjYWxlYCksIH4gc2NhbGUoLikpKQoKcjIyX3NwaXJpdF9jaCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgU2NhbGVgIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJDaGluYSIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYFBvcm9zaXR5IFNjYWxlYCksIH4gc2NhbGUoLikpKQoKcjIyX3NwaXJpdF92dCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgU2NhbGVgIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJWYW51YXR1IikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgUG9yb3NpdHkgU2NhbGVgKSwgfiBzY2FsZSguKSkpCmBgYAoKYGBge3IsIGluY2x1ZGUgPSBGfQojIHJ1biBtYW51YWxseSB0byBjaGVjayBjb252ZXJnZW5jZQpzdW1tYXJ5KHIyMl9zcGlyaXRfdXMpCnN1bW1hcnkocjIyX3NwaXJpdF9naCkKc3VtbWFyeShyMjJfc3Bpcml0X3RoKQpzdW1tYXJ5KHIyMl9zcGlyaXRfY2gpCnN1bW1hcnkocjIyX3NwaXJpdF92dCkKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczQ1IDwtIHN0YXJnYXplcihyMjJfc3Bpcml0X3VzLCByMjJfc3Bpcml0X2doLCByMjJfc3Bpcml0X3RoLCAKICAgICAgICAgICAgICAgICAgICAgICByMjJfc3Bpcml0X2NoLCByMjJfc3Bpcml0X3Z0LCAKICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBQb3Jvc2l0eSBTY2FsZWAkIiksCiAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICBzaW5nbGUucm93ID0gVCkKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3M0NSksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQ1Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQ1Lmh0bWwiKQpgYGAKCmBgYHtyfQpyc3FfdGFibGVfZnVuKGxpc3QocjIyX3NwaXJpdF91cywgcjIyX3NwaXJpdF9naCwgcjIyX3NwaXJpdF90aCwgCiAgICAgICAgICAgICAgICAgICByMjJfc3Bpcml0X2NoLCByMjJfc3Bpcml0X3Z0KSkKYGBgCgojIyMgVGFibGUgUzQ2LiBTdHVkeSA0LCBtZWFzdXJlcyBvZiBzcGlyaXR1YWwgcHJlc2VuY2UgZXZlbnRzOiByZWxhdGlvbnNoaXBzIHdpdGggQWJzb3JwdGlvbiBieSBjb3VudHJ5CgpgYGB7cn0KcjIzX3NwaXJpdF91cyA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgQWJzb3JwdGlvbmAgCiAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCAlPiUgZmlsdGVyKENvdW50cnkgPT0gIlVTIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgQWJzb3JwdGlvbmApLCB+IHNjYWxlKC4pKSkKCnIyM19zcGlyaXRfZ2ggPC0gbG1lcihTY29yZSB+IFNjYWxlICogYEFic29ycHRpb25gIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJHaGFuYSIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYEFic29ycHRpb25gKSwgfiBzY2FsZSguKSkpCgpyMjNfc3Bpcml0X3RoIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBBYnNvcnB0aW9uYCAKICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc3Bpcml0ICU+JSBmaWx0ZXIoQ291bnRyeSA9PSAiVGhhaWxhbmQiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBBYnNvcnB0aW9uYCksIH4gc2NhbGUoLikpKQoKcjIzX3NwaXJpdF9jaCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgQWJzb3JwdGlvbmAgCiAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NwaXJpdCAlPiUgZmlsdGVyKENvdW50cnkgPT0gIkNoaW5hIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgQWJzb3JwdGlvbmApLCB+IHNjYWxlKC4pKSkKCnIyM19zcGlyaXRfdnQgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYEFic29ycHRpb25gIAogICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zcGlyaXQgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJWYW51YXR1IikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgQWJzb3JwdGlvbmApLCB+IHNjYWxlKC4pKSkKYGBgCgpgYGB7ciwgaW5jbHVkZSA9IEZ9CiMgcnVuIG1hbnVhbGx5IHRvIGNoZWNrIGNvbnZlcmdlbmNlCnN1bW1hcnkocjIzX3NwaXJpdF91cykKc3VtbWFyeShyMjNfc3Bpcml0X2doKQpzdW1tYXJ5KHIyM19zcGlyaXRfdGgpCnN1bW1hcnkocjIzX3NwaXJpdF9jaCkKc3VtbWFyeShyMjNfc3Bpcml0X3Z0KQpgYGAKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zNDYgPC0gc3RhcmdhemVyKHIyM19zcGlyaXRfdXMsIHIyM19zcGlyaXRfZ2gsIHIyM19zcGlyaXRfdGgsIAogICAgICAgICAgICAgICAgICAgICAgIHIyM19zcGlyaXRfY2gsIHIyM19zcGlyaXRfdnQsIAogICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeQWJzb3JwdGlvbiQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQ2KSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDYuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDYuaHRtbCIpCmBgYAoKYGBge3J9CnJzcV90YWJsZV9mdW4obGlzdChyMjNfc3Bpcml0X3VzLCByMjNfc3Bpcml0X2doLCByMjNfc3Bpcml0X3RoLCAKICAgICAgICAgICAgICAgICAgIHIyM19zcGlyaXRfY2gsIHIyM19zcGlyaXRfdnQpKQpgYGAKCiMjIFJlbGF0aW9uc2hpcHM6IFNlY3VsYXIgYW5vbWFsb3VzIGV2ZW50cwoKIyMjIFNldHVwCgpgYGB7cn0KIyBsb25nZm9ybSBkYXRhZnJhbWUKZDRfZm9ydGFiX2xvbmdfc2VjdWxhciA8LSBkNF9hYnNfb21pdCAlPiUgCiAgZ2F0aGVyKFNjYWxlLCBTY29yZSwgCiAgICAgICAgIGMoSGFsbHVjaW5hdGlvbnMsIFBhcmFub3JtYWwpKSAlPiUKICBtdXRhdGUoU2NhbGUgPSBmYWN0b3IoU2NhbGUpKQpgYGAKCmBgYHtyfQojIHNldCBjb250cmFzdHMKY29udHJhc3RzKGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIkQ291bnRyeSkgPC0gY2JpbmQoIjogR2guIiA9IGMoLTEsIDEsIDAsIDAsIDApLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiOiBUaC4iID0gYygtMSwgMCwgMSwgMCwgMCksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI6IENoLiIgPSBjKC0xLCAwLCAwLCAxLCAwKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjogVmEuIiA9IGMoLTEsIDAsIDAsIDAsIDEpKQpjb250cmFzdHMoZDRfZm9ydGFiX2xvbmdfc2VjdWxhciRHZW5kZXIpIDwtIGNiaW5kKCI6IG1hbGUiID0gYygtMSwgMSkpCmNvbnRyYXN0cyhkNF9mb3J0YWJfbG9uZ19zZWN1bGFyJFNjYWxlKSA8LSBjYmluZCgiOiBIYWxsdWNpbmF0aW9ucyIgPSBjKDEsIC0xKSkKYGBgCgoKIyMjIFRhYmxlIFM0Ny4gU3R1ZHkgNCwgbWVhc3VyZXMgb2Ygc2VjdWxhciBhbm9tYWxvdXMgZXZlbnRzOiByZWxhdGlvbnNoaXBzIHdpdGggUG9yb3NpdHkgVmlnbmV0dGVzIGFuZCBBYnNvcnB0aW9uIChzYW1wbGUgYXMgZml4ZWQgZWZmZWN0KQoKYGBge3J9CnIwM19zZWN1bGFyIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgCiAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIpCgpyMDRfc2VjdWxhciA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgU2NhbGVgCiAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIpCgpyMDVfc2VjdWxhciA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIpCgpyMDZfc2VjdWxhciA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFZpZ25ldHRlc2AKICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc2VjdWxhcikKCnIwN19zZWN1bGFyIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgU2NhbGVgCiAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIpCgpyMDhfc2VjdWxhciA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyKQoKcjA5X3NlY3VsYXIgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyKQoKcjEwX3NlY3VsYXIgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBTY2FsZWAgKiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIpCgpyMTFfc2VjdWxhciA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc2VjdWxhcikKCnIxMl9zZWN1bGFyIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgU2NhbGVgICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlCiAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIpCmBgYAoKYGBge3IsIGluY2x1ZGUgPSBGfQojIHJ1biBtYW51YWxseSB0byBjaGVjayBjb252ZXJnZW5jZQpzdW1tYXJ5KHIwM19zZWN1bGFyKQpzdW1tYXJ5KHIwNF9zZWN1bGFyKQpzdW1tYXJ5KHIwNV9zZWN1bGFyKQpzdW1tYXJ5KHIwNl9zZWN1bGFyKQpzdW1tYXJ5KHIwN19zZWN1bGFyKQpzdW1tYXJ5KHIwOF9zZWN1bGFyKQpzdW1tYXJ5KHIwOV9zZWN1bGFyKQpzdW1tYXJ5KHIxMF9zZWN1bGFyKQpzdW1tYXJ5KHIxMV9zZWN1bGFyKQpzdW1tYXJ5KHIxMl9zZWN1bGFyKQpgYGAKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zNDcgPC0gc3RhcmdhemVyKHIwM19zZWN1bGFyLCAjcjA0X3NlY3VsYXIsIAogICAgICAgICAgICAgICAgICAgICAgIHIwNV9zZWN1bGFyLCByMDZfc2VjdWxhciwgI3IwN19zZWN1bGFyLCAKICAgICAgICAgICAgICAgICAgICAgICByMDhfc2VjdWxhciwgcjA5X3NlY3VsYXIsICNyMTBfc2VjdWxhciwKICAgICAgICAgICAgICAgICAgICAgICByMTFfc2VjdWxhciwgI3IxMl9zZWN1bGFyLCAKICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeQWJzb3JwdGlvbiQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOkFic29ycHRpb24kIiksCiAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICBzaW5nbGUucm93ID0gVCkgCgpjYXQoc3ViX2ludGVyYWN0X2Z1bih0YWJsZV9zNDcpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3M0Ny5odG1sIikKYGBgCgpgYGB7cn0KaHRtbHRvb2xzOjppbmNsdWRlSFRNTCgiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3M0Ny5odG1sIikKYGBgCgpgYGB7cn0KcnNxX3RhYmxlX2Z1bihsaXN0KHIwM19zZWN1bGFyLCAjcjA0X3NlY3VsYXIsIAogICAgICAgICAgICAgICAgICAgcjA1X3NlY3VsYXIsIHIwNl9zZWN1bGFyLCAjcjA3X3NlY3VsYXIsIAogICAgICAgICAgICAgICAgICAgcjA4X3NlY3VsYXIsIHIwOV9zZWN1bGFyLCAjcjEwX3NlY3VsYXIsCiAgICAgICAgICAgICAgICAgICByMTFfc2VjdWxhciAjLCByMTJfc2VjdWxhciAKKSkKYGBgCgojIyMgVGFibGUgUzQ4LiBTdHVkeSA0LCBtZWFzdXJlcyBvZiBzZWN1bGFyIGFub21hbG91cyBldmVudHM6IHJlbGF0aW9uc2hpcHMgd2l0aCBQb3Jvc2l0eSBTY2FsZSBhbmQgQWJzb3JwdGlvbiAoc2FtcGxlIGFzIGZpeGVkIGVmZmVjdCkKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zNDggPC0gc3RhcmdhemVyKCNyMDNfc2VjdWxhciwgCiAgcjA0X3NlY3VsYXIsIHIwNV9zZWN1bGFyLCAjcjA2X3NlY3VsYXIsCiAgcjA3X3NlY3VsYXIsIHIwOF9zZWN1bGFyLCAjcjA5X3NlY3VsYXIsIAogIHIxMF9zZWN1bGFyLCAjcjExX3NlY3VsYXIsIAogIHIxMl9zZWN1bGFyLCAKICB0eXBlID0gImh0bWwiLAogIGNpID0gVCwKICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgZGlnaXRzID0gMiwKICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogIG9yZGVyID0gYygiXmBQb3Jvc2l0eSBTY2FsZWAkIiwKICAgICAgICAgICAgIl5BYnNvcnB0aW9uJCIsCiAgICAgICAgICAgICJeYFBvcm9zaXR5IFNjYWxlYDpBYnNvcnB0aW9uJCIpLAogICMgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgZGVwLnZhci5jYXB0aW9uID0gIiIsCiAgc2luZ2xlLnJvdyA9IFQpIAoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQ4KSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDguaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNDguaHRtbCIpCmBgYAoKYGBge3J9CnJzcV90YWJsZV9mdW4obGlzdCgjcjAzX3NlY3VsYXIsIAogIHIwNF9zZWN1bGFyLCByMDVfc2VjdWxhciwgI3IwNl9zZWN1bGFyLAogIHIwN19zZWN1bGFyLCByMDhfc2VjdWxhciwgI3IwOV9zZWN1bGFyLCAKICByMTBfc2VjdWxhciwgI3IxMV9zZWN1bGFyLCAKICByMTJfc2VjdWxhcikpCmBgYAoKIyMjIFRhYmxlIFM0OS4gU3R1ZHkgNCwgbWVhc3VyZXMgb2Ygc2VjdWxhciBhbm9tYWxvdXMgZXZlbnRzOiByZWxhdGlvbnNoaXBzIHdpdGggUG9yb3NpdHkgVmlnbmV0dGVzIGFuZCBBYnNvcnB0aW9uIChzYW1wbGUgYXMgcmFuZG9tIGVmZmVjdCkKCmBgYHtyfQpyMTNfc2VjdWxhciA8LSBsbWVyKFNjb3JlIH4gU2NhbGUKICAgICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeS9zdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyKQoKcjE0X3NlY3VsYXIgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFZpZ25ldHRlc2AKICAgICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeS9zdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAjICsgKDEgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCB8IENvdW50cnkpLCAjIGFkZGluZyB0byBhYm92ZSwgZmFpbGVkIHRvIGNvbnZlcmdlCiAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc2VjdWxhcikKCnIxNV9zZWN1bGFyIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBTY2FsZWAKICAgICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeS9zdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAjICsgKDEgKyBgUG9yb3NpdHkgU2NhbGVgIHwgQ291bnRyeSksICMgYWRkaW5nIHRvIGFib3ZlLCBwZXJmZWN0bHkgY29ycmVsYXRlZCByYW5meAogICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIpCgpyMTZfc2VjdWxhciA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkvc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgIyArICgxICsgQWJzb3JwdGlvbiB8IENvdW50cnkpLCAjIGFkZGluZyB0byBhYm92ZSwgcGVyZmVjdGx5IGNvcnJlbGF0ZWQgcmFuZngKICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyKQoKcjE3X3NlY3VsYXIgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgICAgKyAoMSB8IENvdW50cnkvc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgIyArICgxICsgYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBBYnNvcnB0aW9uIHwgQ291bnRyeSksICMgYWRkaW5nIHRvIGFib3ZlLCBwZXJmZWN0bHkgY29ycmVsYXRlZCByYW5meAogICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIpCgpyMThfc2VjdWxhciA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgU2NhbGVgICogQWJzb3JwdGlvbgogICAgICAgICAgICAgICAgICAgICsgKDEgfCBDb3VudHJ5L3N1YmplY3RfaWQpLCAKICAgICAgICAgICAgICAgICAgICAjICsgKDEgKyBgUG9yb3NpdHkgU2NhbGVgICogQWJzb3JwdGlvbiB8IENvdW50cnkpLCAjIGFkZGluZyB0byBhYm92ZSwgcGVyZmVjdGx5IGNvcnJlbGF0ZWQgcmFuZngKICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyKQoKcjE5X3NlY3VsYXIgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBBYnNvcnB0aW9uCiAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICArICgxIHwgQ291bnRyeS9zdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAjICsgKDEgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIEFic29ycHRpb24gKyBHZW5kZXIgKyBBZ2UgfCBDb3VudHJ5KSwKICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyKQoKcjIwX3NlY3VsYXIgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFNjYWxlYCAqIEFic29ycHRpb24KICAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZQogICAgICAgICAgICAgICAgICAgICsgKDEgfCBDb3VudHJ5L3N1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICMgKyAoMSArIGBQb3Jvc2l0eSBTY2FsZWAgKiBBYnNvcnB0aW9uICsgR2VuZGVyICsgQWdlIHwgQ291bnRyeSksCiAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc2VjdWxhcikKYGBgCgpgYGB7ciwgaW5jbHVkZSA9IEZ9CiMgcnVuIG1hbnVhbGx5IHRvIGNoZWNrIGNvbnZlcmdlbmNlCnN1bW1hcnkocjEzX3NlY3VsYXIpCnN1bW1hcnkocjE0X3NlY3VsYXIpCnN1bW1hcnkocjE1X3NlY3VsYXIpCnN1bW1hcnkocjE2X3NlY3VsYXIpCnN1bW1hcnkocjE3X3NlY3VsYXIpCnN1bW1hcnkocjE4X3NlY3VsYXIpCnN1bW1hcnkocjE5X3NlY3VsYXIpCnN1bW1hcnkocjIwX3NlY3VsYXIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0OSA8LSBzdGFyZ2F6ZXIocjEzX3NlY3VsYXIsIHIxNF9zZWN1bGFyLCAjcjE1X3NlY3VsYXIsCiAgICAgICAgICAgICAgICAgICAgICAgcjE2X3NlY3VsYXIsIHIxN19zZWN1bGFyLCAjcjE4X3NlY3VsYXIsCiAgICAgICAgICAgICAgICAgICAgICAgcjE5X3NlY3VsYXIsICNyMjBfc2VjdWxhciwKICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeQWJzb3JwdGlvbiQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOkFic29ycHRpb24kIiksCiAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICBzaW5nbGUucm93ID0gVCkKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3M0OSksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQ5Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQ5Lmh0bWwiKQpgYGAKCmBgYHtyfQpyc3FfdGFibGVfZnVuKGxpc3QocjEzX3NlY3VsYXIsIHIxNF9zZWN1bGFyLCAjcjE1X3NlY3VsYXIsCiAgICAgICAgICAgICAgICAgICByMTZfc2VjdWxhciwgcjE3X3NlY3VsYXIsICNyMThfc2VjdWxhciwKICAgICAgICAgICAgICAgICAgIHIxOV9zZWN1bGFyICMsIHIyMF9zZWN1bGFyCikpCmBgYAoKIyMjIFRhYmxlIFM1MC4gU3R1ZHkgNCwgbWVhc3VyZXMgb2Ygc2VjdWxhciBhbm9tYWxvdXMgZXZlbnRzOiByZWxhdGlvbnNoaXBzIHdpdGggUG9yb3NpdHkgU2NhbGUgYW5kIEFic29ycHRpb24gKHNhbXBsZSBhcyByYW5kb20gZWZmZWN0KQoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M1MCA8LSBzdGFyZ2F6ZXIocjEzX3NlY3VsYXIsICNyMTRfc2VjdWxhciwgCiAgICAgICAgICAgICAgICAgICAgICAgcjE1X3NlY3VsYXIsIHIxNl9zZWN1bGFyLCAjcjE3X3NlY3VsYXIsIAogICAgICAgICAgICAgICAgICAgICAgIHIxOF9zZWN1bGFyLCAjcjE5X3NlY3VsYXIsIAogICAgICAgICAgICAgICAgICAgICAgIHIyMF9zZWN1bGFyLAogICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeYFBvcm9zaXR5IFNjYWxlYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXkFic29ycHRpb24kIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgU2NhbGVgOkFic29ycHRpb24kIiksCiAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICBzaW5nbGUucm93ID0gVCkKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3M1MCksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczUwLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczUwLmh0bWwiKQpgYGAKCmBgYHtyfQpyc3FfdGFibGVfZnVuKGxpc3QocjEzX3NlY3VsYXIsICNyMTRfc2VjdWxhciwgCiAgICAgICAgICAgICAgICAgICByMTVfc2VjdWxhciwgcjE2X3NlY3VsYXIsICNyMTdfc2VjdWxhciwgCiAgICAgICAgICAgICAgICAgICByMThfc2VjdWxhciwgI3IxOV9zZWN1bGFyIAogICAgICAgICAgICAgICAgICAgcjIwX3NlY3VsYXIKKSkKYGBgCgojIyMgVGFibGUgUzUxLiBTdHVkeSA0LCBtZWFzdXJlcyBvZiBzZWN1bGFyIGFub21hbG91cyBldmVudHM6IHJlbGF0aW9uc2hpcHMgd2l0aCBQb3Jvc2l0eSBWaWduZXR0ZXMgYnkgY291bnRyeQoKYGBge3J9CnIyMV9zZWN1bGFyX3VzIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgIAogICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyICU+JSBmaWx0ZXIoQ291bnRyeSA9PSAiVVMiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgUG9yb3NpdHkgVmlnbmV0dGVzYCksIH4gc2NhbGUoLikpKQoKcjIxX3NlY3VsYXJfZ2ggPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgCiAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJHaGFuYSIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsICxgUG9yb3NpdHkgVmlnbmV0dGVzYCksIH4gc2NhbGUoLikpKQoKcjIxX3NlY3VsYXJfdGggPC0gbG1lcihTY29yZSB+IFNjYWxlICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgCiAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJUaGFpbGFuZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBQb3Jvc2l0eSBWaWduZXR0ZXNgKSwgfiBzY2FsZSguKSkpCgpyMjFfc2VjdWxhcl9jaCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAKICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc2VjdWxhciAlPiUgZmlsdGVyKENvdW50cnkgPT0gIkNoaW5hIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYFBvcm9zaXR5IFZpZ25ldHRlc2ApLCB+IHNjYWxlKC4pKSkKCnIyMV9zZWN1bGFyX3Z0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgIAogICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyICU+JSBmaWx0ZXIoQ291bnRyeSA9PSAiVmFudWF0dSIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBQb3Jvc2l0eSBWaWduZXR0ZXNgKSwgfiBzY2FsZSguKSkpCmBgYAoKYGBge3IsIGluY2x1ZGUgPSBGfQojIHJ1biBtYW51YWxseSB0byBjaGVjayBjb252ZXJnZW5jZQpzdW1tYXJ5KHIyMV9zZWN1bGFyX3VzKQpzdW1tYXJ5KHIyMV9zZWN1bGFyX2doKQpzdW1tYXJ5KHIyMV9zZWN1bGFyX3RoKQpzdW1tYXJ5KHIyMV9zZWN1bGFyX2NoKQpzdW1tYXJ5KHIyMV9zZWN1bGFyX3Z0KQpgYGAKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zNTEgPC0gc3RhcmdhemVyKHIyMV9zZWN1bGFyX3VzLCByMjFfc2VjdWxhcl9naCwgcjIxX3NlY3VsYXJfdGgsIAogICAgICAgICAgICAgICAgICAgICAgIHIyMV9zZWN1bGFyX2NoLCByMjFfc2VjdWxhcl92dCwgCiAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICBjaSA9IFQsCiAgICAgICAgICAgICAgICAgICAgICAgcmVwb3J0ID0gYygidmNzcCIpLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzLmV4dHJhID0gMTAwMCwKICAgICAgICAgICAgICAgICAgICAgICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgVmlnbmV0dGVzYCQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczUxKSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNTEuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNTEuaHRtbCIpCmBgYAoKYGBge3J9CnJzcV90YWJsZV9mdW4obGlzdChyMjFfc2VjdWxhcl91cywgcjIxX3NlY3VsYXJfZ2gsIHIyMV9zZWN1bGFyX3RoLCAKICAgICAgICAgICAgICAgICAgIHIyMV9zZWN1bGFyX2NoLCByMjFfc2VjdWxhcl92dCkpCmBgYAoKIyMjIFRhYmxlIFM1Mi4gU3R1ZHkgNCwgbWVhc3VyZXMgb2Ygc2VjdWxhciBhbm9tYWxvdXMgZXZlbnRzOiByZWxhdGlvbnNoaXBzIHdpdGggUG9yb3NpdHkgU2NhbGUgYnkgY291bnRyeQoKYGBge3J9CnIyMl9zZWN1bGFyX3VzIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBTY2FsZWAgCiAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJVUyIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBQb3Jvc2l0eSBTY2FsZWApLCB+IHNjYWxlKC4pKSkKCnIyMl9zZWN1bGFyX2doIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBTY2FsZWAgCiAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJHaGFuYSIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBQb3Jvc2l0eSBTY2FsZWApLCB+IHNjYWxlKC4pKSkKCnIyMl9zZWN1bGFyX3RoIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBTY2FsZWAgCiAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJUaGFpbGFuZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBQb3Jvc2l0eSBTY2FsZWApLCB+IHNjYWxlKC4pKSkKCnIyMl9zZWN1bGFyX2NoIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBTY2FsZWAgCiAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJDaGluYSIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBQb3Jvc2l0eSBTY2FsZWApLCB+IHNjYWxlKC4pKSkKCnIyMl9zZWN1bGFyX3Z0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBQb3Jvc2l0eSBTY2FsZWAgCiAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJWYW51YXR1IikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYFBvcm9zaXR5IFNjYWxlYCksIH4gc2NhbGUoLikpKQpgYGAKCmBgYHtyLCBpbmNsdWRlID0gRn0KIyBydW4gbWFudWFsbHkgdG8gY2hlY2sgY29udmVyZ2VuY2UKc3VtbWFyeShyMjJfc2VjdWxhcl91cykKc3VtbWFyeShyMjJfc2VjdWxhcl9naCkKc3VtbWFyeShyMjJfc2VjdWxhcl90aCkKc3VtbWFyeShyMjJfc2VjdWxhcl9jaCkKc3VtbWFyeShyMjJfc2VjdWxhcl92dCkKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczUyIDwtIHN0YXJnYXplcihyMjJfc2VjdWxhcl91cywgcjIyX3NlY3VsYXJfZ2gsIHIyMl9zZWN1bGFyX3RoLCAKICAgICAgICAgICAgICAgICAgICAgICByMjJfc2VjdWxhcl9jaCwgcjIyX3NlY3VsYXJfdnQsIAogICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeYFBvcm9zaXR5IFNjYWxlYCQiKSwKICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczUyKSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNTIuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zNTIuaHRtbCIpCmBgYAoKYGBge3J9CnJzcV90YWJsZV9mdW4obGlzdChyMjJfc2VjdWxhcl91cywgcjIyX3NlY3VsYXJfZ2gsIHIyMl9zZWN1bGFyX3RoLCAKICAgICAgICAgICAgICAgICAgIHIyMl9zZWN1bGFyX2NoLCByMjJfc2VjdWxhcl92dCkpCmBgYAoKIyMjIFRhYmxlIFM1My4gU3R1ZHkgNCwgbWVhc3VyZXMgb2Ygc2VjdWxhciBhbm9tYWxvdXMgZXZlbnRzOiByZWxhdGlvbnNoaXBzIHdpdGggQWJzb3JwdGlvbiBieSBjb3VudHJ5CgpgYGB7cn0KcjIzX3NlY3VsYXJfdXMgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYEFic29ycHRpb25gIAogICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyICU+JSBmaWx0ZXIoQ291bnRyeSA9PSAiVVMiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgQWJzb3JwdGlvbmApLCB+IHNjYWxlKC4pKSkKCnIyM19zZWN1bGFyX2doIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBBYnNvcnB0aW9uYCAKICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc2VjdWxhciAlPiUgZmlsdGVyKENvdW50cnkgPT0gIkdoYW5hIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICBtdXRhdGVfYXQodmFycyhTY29yZSwgYEFic29ycHRpb25gKSwgfiBzY2FsZSguKSkpCgpyMjNfc2VjdWxhcl90aCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgQWJzb3JwdGlvbmAgCiAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2ZvcnRhYl9sb25nX3NlY3VsYXIgJT4lIGZpbHRlcihDb3VudHJ5ID09ICJUaGFpbGFuZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgbXV0YXRlX2F0KHZhcnMoU2NvcmUsIGBBYnNvcnB0aW9uYCksIH4gc2NhbGUoLikpKQoKcjIzX3NlY3VsYXJfY2ggPC0gbG1lcihTY29yZSB+IFNjYWxlICogYEFic29ycHRpb25gIAogICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9mb3J0YWJfbG9uZ19zZWN1bGFyICU+JSBmaWx0ZXIoQ291bnRyeSA9PSAiQ2hpbmEiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgQWJzb3JwdGlvbmApLCB+IHNjYWxlKC4pKSkKCnIyM19zZWN1bGFyX3Z0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBBYnNvcnB0aW9uYCAKICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfZm9ydGFiX2xvbmdfc2VjdWxhciAlPiUgZmlsdGVyKENvdW50cnkgPT0gIlZhbnVhdHUiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgIG11dGF0ZV9hdCh2YXJzKFNjb3JlLCBgQWJzb3JwdGlvbmApLCB+IHNjYWxlKC4pKSkKYGBgCgpgYGB7ciwgaW5jbHVkZSA9IEZ9CiMgcnVuIG1hbnVhbGx5IHRvIGNoZWNrIGNvbnZlcmdlbmNlCnN1bW1hcnkocjIzX3NlY3VsYXJfdXMpCnN1bW1hcnkocjIzX3NlY3VsYXJfZ2gpCnN1bW1hcnkocjIzX3NlY3VsYXJfdGgpCnN1bW1hcnkocjIzX3NlY3VsYXJfY2gpCnN1bW1hcnkocjIzX3NlY3VsYXJfdnQpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M1MyA8LSBzdGFyZ2F6ZXIocjIzX3NlY3VsYXJfdXMsIHIyM19zZWN1bGFyX2doLCByMjNfc2VjdWxhcl90aCwgCiAgICAgICAgICAgICAgICAgICAgICAgcjIzX3NlY3VsYXJfY2gsIHIyM19zZWN1bGFyX3Z0LCAKICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXkFic29ycHRpb24kIiksCiAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICBzaW5nbGUucm93ID0gVCkKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3M1MyksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczUzLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczUzLmh0bWwiKQpgYGAKCmBgYHtyfQpyc3FfdGFibGVfZnVuKGxpc3QocjIzX3NlY3VsYXJfdXMsIHIyM19zZWN1bGFyX2doLCByMjNfc2VjdWxhcl90aCwgCiAgICAgICAgICAgICAgICAgICByMjNfc2VjdWxhcl9jaCwgcjIzX3NlY3VsYXJfdnQpKQpgYGAKCgojIEV4cGxvcmF0b3J5IGZhY3RvciBhbmFseXNlcwoKIyMgU3R1ZHkgMQoKIyMjIEFsbCBzaXRlcwoKYGBge3J9CmQxX2FicyA8LSBkMV9ieXEgJT4lCiAgc2VsZWN0KHN1YmplY3RfaWQsIGVuZHNfd2l0aCgiX2FicyIpKSAlPiUKICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmplY3RfaWQiKQpgYGAKCmBgYHtyfQpmYS5wYXJhbGxlbChkMV9hYnMpCmBgYAoKYGBge3J9CmQxX2FsbF9lZmEgPC0gZmEoZDFfYWJzLCBuZmFjdG9ycyA9IDQsIHJvdGF0ZSA9ICJvYmxpbWluIikKYGBgCgpgYGB7cn0KZDFfYWxsX2xvYWRpbmdzIDwtIGQxX2FsbF9lZmEkbG9hZGluZ3NbXSAlPiUgCiAgZmEuc29ydCgpICU+JQogIGRhdGEuZnJhbWUoKSAlPiUKICByb3duYW1lc190b19jb2x1bW4oInF1ZXN0aW9uIikgJT4lCiAgbXV0YXRlKG9yZGVyID0gMTpucm93KC4pKSAlPiUKICBnYXRoZXIoZmFjdG9yLCBsb2FkaW5nLCAtcXVlc3Rpb24sIC1vcmRlcikKYGBgCgpgYGB7ciwgZmlnLndpZHRoID0gMywgZmlnLmFzcCA9IDF9CmQxX2FsbF9sb2FkaW5ncyAlPiUKICBtdXRhdGUocXVlc3Rpb24gPSBnc3ViKCJfYWJzIiwgIiIsIHF1ZXN0aW9uKSkgJT4lCiAgZ2dwbG90KGFlcyh4ID0gZmFjdG9yLCB5ID0gcmVvcmRlcihxdWVzdGlvbiwgZGVzYyhvcmRlcikpLCBmaWxsID0gbG9hZGluZykpICsKICBnZW9tX3RpbGUoY29sb3IgPSAiYmxhY2siKSArCiAgZ2VvbV90ZXh0KGFlcyhsYWJlbCA9IGZvcm1hdChyb3VuZChsb2FkaW5nLCAyKSwgbnNtYWxsID0gMikpLCBzaXplID0gMykgKwogIHNjYWxlX2ZpbGxfZGlzdGlsbGVyKHBhbGV0dGUgPSAiUmRZbEJ1IiwgbGltaXRzID0gYygtMSwgMSkpICsKICBsYWJzKHRpdGxlID0gIlN0dWR5IDE6IEFsbCBzaXRlcyIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKIyMjIFVTCgpgYGB7cn0KZDFfYWJzX3VzIDwtIGQxX2J5cSAlPiUKICBmaWx0ZXIoY291bnRyeSA9PSAiVVMiKSAlPiUKICBzZWxlY3Qoc3ViamVjdF9pZCwgZW5kc193aXRoKCJfYWJzIikpICU+JQogIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpCmBgYAoKYGBge3J9CmZhLnBhcmFsbGVsKGQxX2Fic191cykKYGBgCgpgYGB7cn0KZDFfdXNfZWZhIDwtIGZhKGQxX2FicywgbmZhY3RvcnMgPSAzLCByb3RhdGUgPSAib2JsaW1pbiIpCmBgYAoKYGBge3J9CmQxX3VzX2xvYWRpbmdzIDwtIGQxX3VzX2VmYSRsb2FkaW5nc1tdICU+JSAKICBmYS5zb3J0KCkgJT4lCiAgZGF0YS5mcmFtZSgpICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigicXVlc3Rpb24iKSAlPiUKICBtdXRhdGUob3JkZXIgPSAxOm5yb3coLikpICU+JQogIGdhdGhlcihmYWN0b3IsIGxvYWRpbmcsIC1xdWVzdGlvbiwgLW9yZGVyKQpgYGAKCmBgYHtyLCBmaWcud2lkdGggPSAzLCBmaWcuYXNwID0gMX0KZDFfdXNfbG9hZGluZ3MgJT4lCiAgbXV0YXRlKHF1ZXN0aW9uID0gZ3N1YigiX2FicyIsICIiLCBxdWVzdGlvbikpICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGV4dChhZXMobGFiZWwgPSBmb3JtYXQocm91bmQobG9hZGluZywgMiksIG5zbWFsbCA9IDIpKSwgc2l6ZSA9IDMpICsKICBzY2FsZV9maWxsX2Rpc3RpbGxlcihwYWxldHRlID0gIlJkWWxCdSIsIGxpbWl0cyA9IGMoLTEsIDEpKSArCiAgbGFicyh0aXRsZSA9ICJTdHVkeSAxOiBVUyIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKIyMjIEdoYW5hCgpgYGB7cn0KZDFfYWJzX2doIDwtIGQxX2J5cSAlPiUKICBmaWx0ZXIoY291bnRyeSA9PSAiR2hhbmEiKSAlPiUKICBzZWxlY3Qoc3ViamVjdF9pZCwgZW5kc193aXRoKCJfYWJzIikpICU+JQogIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpCmBgYAoKYGBge3J9CmZhLnBhcmFsbGVsKGQxX2Fic19naCkKYGBgCgpgYGB7cn0KZDFfZ2hfZWZhIDwtIGZhKGQxX2FicywgbmZhY3RvcnMgPSAyLCByb3RhdGUgPSAib2JsaW1pbiIpCmBgYAoKYGBge3J9CmQxX2doX2xvYWRpbmdzIDwtIGQxX2doX2VmYSRsb2FkaW5nc1tdICU+JSAKICBmYS5zb3J0KCkgJT4lCiAgZGF0YS5mcmFtZSgpICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigicXVlc3Rpb24iKSAlPiUKICBtdXRhdGUob3JkZXIgPSAxOm5yb3coLikpICU+JQogIGdhdGhlcihmYWN0b3IsIGxvYWRpbmcsIC1xdWVzdGlvbiwgLW9yZGVyKQpgYGAKCmBgYHtyLCBmaWcud2lkdGggPSAzLCBmaWcuYXNwID0gMX0KZDFfZ2hfbG9hZGluZ3MgJT4lCiAgbXV0YXRlKHF1ZXN0aW9uID0gZ3N1YigiX2FicyIsICIiLCBxdWVzdGlvbikpICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGV4dChhZXMobGFiZWwgPSBmb3JtYXQocm91bmQobG9hZGluZywgMiksIG5zbWFsbCA9IDIpKSwgc2l6ZSA9IDMpICsKICBzY2FsZV9maWxsX2Rpc3RpbGxlcihwYWxldHRlID0gIlJkWWxCdSIsIGxpbWl0cyA9IGMoLTEsIDEpKSArCiAgbGFicyh0aXRsZSA9ICJTdHVkeSAxOiBHaGFuYSIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKIyMjIFRoYWlsYW5kCgpgYGB7cn0KZDFfYWJzX3RoIDwtIGQxX2J5cSAlPiUKICBmaWx0ZXIoY291bnRyeSA9PSAiVGhhaWxhbmQiKSAlPiUKICBzZWxlY3Qoc3ViamVjdF9pZCwgZW5kc193aXRoKCJfYWJzIikpICU+JQogIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpCmBgYAoKYGBge3J9CmZhLnBhcmFsbGVsKGQxX2Fic190aCkKYGBgCgpgYGB7cn0KZDFfdGhfZWZhIDwtIGZhKGQxX2FicywgbmZhY3RvcnMgPSAxLCByb3RhdGUgPSAib2JsaW1pbiIpCmBgYAoKYGBge3J9CmQxX3RoX2xvYWRpbmdzIDwtIGQxX3RoX2VmYSRsb2FkaW5nc1tdICU+JSAKICBmYS5zb3J0KCkgJT4lCiAgZGF0YS5mcmFtZSgpICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigicXVlc3Rpb24iKSAlPiUKICBtdXRhdGUob3JkZXIgPSAxOm5yb3coLikpICU+JQogIGdhdGhlcihmYWN0b3IsIGxvYWRpbmcsIC1xdWVzdGlvbiwgLW9yZGVyKQpgYGAKCmBgYHtyLCBmaWcud2lkdGggPSAzLCBmaWcuYXNwID0gMX0KZDFfdGhfbG9hZGluZ3MgJT4lCiAgbXV0YXRlKHF1ZXN0aW9uID0gZ3N1YigiX2FicyIsICIiLCBxdWVzdGlvbikpICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGV4dChhZXMobGFiZWwgPSBmb3JtYXQocm91bmQobG9hZGluZywgMiksIG5zbWFsbCA9IDIpKSwgc2l6ZSA9IDMpICsKICBzY2FsZV9maWxsX2Rpc3RpbGxlcihwYWxldHRlID0gIlJkWWxCdSIsIGxpbWl0cyA9IGMoLTEsIDEpKSArCiAgbGFicyh0aXRsZSA9ICJTdHVkeSAxOiBUaGFpbGFuZCIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKIyMjIENoaW5hCgpgYGB7cn0KZDFfYWJzX2NoIDwtIGQxX2J5cSAlPiUKICBmaWx0ZXIoY291bnRyeSA9PSAiQ2hpbmEiKSAlPiUKICBzZWxlY3Qoc3ViamVjdF9pZCwgZW5kc193aXRoKCJfYWJzIikpICU+JQogIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpCmBgYAoKYGBge3J9CmZhLnBhcmFsbGVsKGQxX2Fic19jaCkKYGBgCgpgYGB7cn0KZDFfY2hfZWZhIDwtIGZhKGQxX2FicywgbmZhY3RvcnMgPSAxLCByb3RhdGUgPSAib2JsaW1pbiIpCmBgYAoKYGBge3J9CmQxX2NoX2xvYWRpbmdzIDwtIGQxX2NoX2VmYSRsb2FkaW5nc1tdICU+JSAKICBmYS5zb3J0KCkgJT4lCiAgZGF0YS5mcmFtZSgpICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigicXVlc3Rpb24iKSAlPiUKICBtdXRhdGUob3JkZXIgPSAxOm5yb3coLikpICU+JQogIGdhdGhlcihmYWN0b3IsIGxvYWRpbmcsIC1xdWVzdGlvbiwgLW9yZGVyKQpgYGAKCmBgYHtyLCBmaWcud2lkdGggPSAzLCBmaWcuYXNwID0gMX0KZDFfY2hfbG9hZGluZ3MgJT4lCiAgbXV0YXRlKHF1ZXN0aW9uID0gZ3N1YigiX2FicyIsICIiLCBxdWVzdGlvbikpICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGV4dChhZXMobGFiZWwgPSBmb3JtYXQocm91bmQobG9hZGluZywgMiksIG5zbWFsbCA9IDIpKSwgc2l6ZSA9IDMpICsKICBzY2FsZV9maWxsX2Rpc3RpbGxlcihwYWxldHRlID0gIlJkWWxCdSIsIGxpbWl0cyA9IGMoLTEsIDEpKSArCiAgbGFicyh0aXRsZSA9ICJTdHVkeSAxOiBDaGluYSIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKIyMjIFZhbnVhdHUKCmBgYHtyfQpkMV9hYnNfdnQgPC0gZDFfYnlxICU+JQogIGZpbHRlcihjb3VudHJ5ID09ICJWYW51YXR1IikgJT4lCiAgc2VsZWN0KHN1YmplY3RfaWQsIGVuZHNfd2l0aCgiX2FicyIpKSAlPiUKICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmplY3RfaWQiKQpgYGAKCmBgYHtyfQpmYS5wYXJhbGxlbChkMV9hYnNfdnQpCmBgYAoKYGBge3J9CmQxX3Z0X2VmYSA8LSBmYShkMV9hYnMsIG5mYWN0b3JzID0gNSwgcm90YXRlID0gIm9ibGltaW4iKQpgYGAKCmBgYHtyfQpkMV92dF9sb2FkaW5ncyA8LSBkMV92dF9lZmEkbG9hZGluZ3NbXSAlPiUgCiAgZmEuc29ydCgpICU+JQogIGRhdGEuZnJhbWUoKSAlPiUKICByb3duYW1lc190b19jb2x1bW4oInF1ZXN0aW9uIikgJT4lCiAgbXV0YXRlKG9yZGVyID0gMTpucm93KC4pKSAlPiUKICBnYXRoZXIoZmFjdG9yLCBsb2FkaW5nLCAtcXVlc3Rpb24sIC1vcmRlcikKYGBgCgpgYGB7ciwgZmlnLndpZHRoID0gMywgZmlnLmFzcCA9IDF9CmQxX3Z0X2xvYWRpbmdzICU+JQogIG11dGF0ZShxdWVzdGlvbiA9IGdzdWIoIl9hYnMiLCAiIiwgcXVlc3Rpb24pKSAlPiUKICBnZ3Bsb3QoYWVzKHggPSBmYWN0b3IsIHkgPSByZW9yZGVyKHF1ZXN0aW9uLCBkZXNjKG9yZGVyKSksIGZpbGwgPSBsb2FkaW5nKSkgKwogIGdlb21fdGlsZShjb2xvciA9ICJibGFjayIpICsKICBnZW9tX3RleHQoYWVzKGxhYmVsID0gZm9ybWF0KHJvdW5kKGxvYWRpbmcsIDIpLCBuc21hbGwgPSAyKSksIHNpemUgPSAzKSArCiAgc2NhbGVfZmlsbF9kaXN0aWxsZXIocGFsZXR0ZSA9ICJSZFlsQnUiLCBsaW1pdHMgPSBjKC0xLCAxKSkgKwogIGxhYnModGl0bGUgPSAiU3R1ZHkgMTogVmFudWF0dSIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKIyMgU3R1ZHkgMwoKIyMjIEFsbCBzaXRlcwoKYGBge3J9CmQzX2FicyA8LSBkM19ieXEgJT4lCiAgc2VsZWN0KHN1YmosIHF1ZXN0aW9uLCByZXNwb25zZSkgJT4lCiAgZmlsdGVyKHF1ZXN0aW9uICVpbiUgYygiZXh3bF8wMSIsICJleHdsXzAyIiwgImV4d2xfMDMiLCAiZXh3bF8wNCIsICJleHdsXzA1IiwgImV4d2xfMDYiLAogICAgICAgICAgICAgICAgICAgICAgICAgImV4d2xfMDciLCAiZXh3bF8wOCIsICJleHdsXzA5IiwgImV4d2xfMTAiLCAiZXh3bF8xMSIsICJleHdsXzEyIiwKICAgICAgICAgICAgICAgICAgICAgICAgICJleHdsXzEzIiwgImV4d2xfMTQiLCAiZXh3bF8xNSIsICJleHdsXzE2IiwgImV4d2xfMTciLCAiZXh3bF8xOCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAiZXh3bF8xOSIsICJleHdsXzIwIiwgImV4d2xfMjEiLCAiZXh3bF8yMiIsICJleHdsXzIzIiwgImV4d2xfMjQiLAogICAgICAgICAgICAgICAgICAgICAgICAgImV4d2xfMjUiLCAiZXh3bF8yNiIsICJleHdsXzI3IiwgImV4d2xfMjgiLCAiZXh3bF8yOSIsICJleHdsXzMwIiwKICAgICAgICAgICAgICAgICAgICAgICAgICJleHdsXzMxIiwgImV4d2xfMzIiLCAiZXh3bF8zMyIsICJleHdsXzM0IikpICU+JQogIG11dGF0ZShxdWVzdGlvbiA9IGZhY3RvcigKICAgIHF1ZXN0aW9uLAogICAgbGV2ZWxzID0gYygiZXh3bF8wMSIsICJleHdsXzAyIiwgImV4d2xfMDMiLCAiZXh3bF8wNCIsIAogICAgICAgICAgICAgICAiZXh3bF8wNSIsICJleHdsXzA2IiwgImV4d2xfMDciLCAiZXh3bF8wOCIsIAogICAgICAgICAgICAgICAiZXh3bF8wOSIsICJleHdsXzEwIiwgImV4d2xfMTEiLCAiZXh3bF8xMiIsCiAgICAgICAgICAgICAgICJleHdsXzEzIiwgImV4d2xfMTQiLCAiZXh3bF8xNSIsICJleHdsXzE2IiwgCiAgICAgICAgICAgICAgICJleHdsXzE3IiwgImV4d2xfMTgiLCAiZXh3bF8xOSIsICJleHdsXzIwIiwgCiAgICAgICAgICAgICAgICJleHdsXzIxIiwgImV4d2xfMjIiLCAiZXh3bF8yMyIsICJleHdsXzI0IiwKICAgICAgICAgICAgICAgImV4d2xfMjUiLCAiZXh3bF8yNiIsICJleHdsXzI3IiwgImV4d2xfMjgiLCAKICAgICAgICAgICAgICAgImV4d2xfMjkiLCAiZXh3bF8zMCIsICJleHdsXzMxIiwgImV4d2xfMzIiLCAKICAgICAgICAgICAgICAgImV4d2xfMzMiLCAiZXh3bF8zNCIpLAogICAgbGFiZWxzID0gYygiY2hpbGRleHAiLCAicG9ldGljbGFuZ3VhZ2UiLCAiZm9yZ2V0c3Vycm91bmRpbmciLCAic3RhcmVwaWN0dXJlIiwgCiAgICAgICAgICAgICAgICJtaW5kZW52ZWxvcHdvcmxkIiwgImNsb3Vkc2hhcGVzIiwgInZpdmlkZGF5ZHJlYW0iLCAibXlzdGljYWxleHAiLCAKICAgICAgICAgICAgICAgInN0ZXBvdXRzaWRlbXlzZWxmIiwgInRleHR1cmVzIiwgImRvdWJseXJlYWwiLCAiY2F1Z2h0dXBpbm11c2ljIiwgCiAgICAgICAgICAgICAgICJoZWF2eWJvZHkiLCAic2Vuc2VwcmVzZW5jZSIsICJ3b29kZmlyZWltYWdpbmUiLCAiaW1tZXJzZWRuYXR1cmUiLCAKICAgICAgICAgICAgICAgImNvbG9ybWVhbmluZyIsICJ3YW5kZXJ0aG91Z2h0c3Rhc2siLCAiY2xlYXJwYXN0ZXhwIiwgIm1lYW5pbmdsZXNzdG9vdGhlcnMiLCAKICAgICAgICAgICAgICAgImFjdGluZ2lucGxheSIsICJ2aXN1YWx0aG91Z2h0cyIsICJkZWxpZ2h0c21hbGx0aGluZ3MiLCAib3JnYW5tdXNpYyIsIAogICAgICAgICAgICAgICAiY2hhbmdlbm9pc2UiLCAidml2aWRzbWVsbG1lbW9yaWVzIiwgInN5bmVzdGhlc2lhc291bmQiLCAicHJlZGljdHdvcmRzIiwgCiAgICAgICAgICAgICAgICJwaHlzaWNhbG1lbW9yaWVzIiwgImZhc2NpbmF0aW5ndm9pY2UiLCAiaW52aXNpYmxlcHJlc2VuY2UiLCAic3BvbnRob3VnaHRzaW1hZ2VzIiwgCiAgICAgICAgICAgICAgICJzeW5lc3RoZXNpYXNtZWxsIiwgImVtb3N1bnNldCIpKSkgJT4lCiAgc3ByZWFkKHF1ZXN0aW9uLCByZXNwb25zZSkgJT4lCiAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqIikKYGBgCgpgYGB7cn0KZmEucGFyYWxsZWwoZDNfYWJzKQpgYGAKCmBgYHtyfQpkM19hbGxfZWZhIDwtIGZhKGQzX2FicywgbmZhY3RvcnMgPSA2LCByb3RhdGUgPSAib2JsaW1pbiIpCmBgYAoKYGBge3J9CmQzX2FsbF9sb2FkaW5ncyA8LSBkM19hbGxfZWZhJGxvYWRpbmdzW10gJT4lIAogIGZhLnNvcnQoKSAlPiUKICBkYXRhLmZyYW1lKCkgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJxdWVzdGlvbiIpICU+JQogIG11dGF0ZShvcmRlciA9IDE6bnJvdyguKSkgJT4lCiAgZ2F0aGVyKGZhY3RvciwgbG9hZGluZywgLXF1ZXN0aW9uLCAtb3JkZXIpCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDMsIGZpZy5hc3AgPSAxfQpkM19hbGxfbG9hZGluZ3MgJT4lCiAgbXV0YXRlKHF1ZXN0aW9uID0gZ3N1YigiX2FicyIsICIiLCBxdWVzdGlvbikpICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGV4dChhZXMobGFiZWwgPSBmb3JtYXQocm91bmQobG9hZGluZywgMiksIG5zbWFsbCA9IDIpKSwgc2l6ZSA9IDMpICsKICBzY2FsZV9maWxsX2Rpc3RpbGxlcihwYWxldHRlID0gIlJkWWxCdSIsIGxpbWl0cyA9IGMoLTEsIDEpKSArCiAgbGFicyh0aXRsZSA9ICJTdHVkeSAzOiBBbGwgc2l0ZXMiLCB4ID0gImZhY3RvciIsIHkgPSAicXVlc3Rpb24iKQpgYGAKCiMjIyBVUwoKYGBge3J9CmQzX2Fic191cyA8LSBkM19hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqIikgJT4lCiAgZmlsdGVyKHN1YmogJWluJSBjKGQzX2J5cSAlPiUgZmlsdGVyKGN0cnkgPT0gInVzIikgJT4lIGRpc3RpbmN0KHN1YmopICU+JSBwdWxsKHN1YmopKSkgJT4lCiAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqIikKYGBgCgpgYGB7cn0KZmEucGFyYWxsZWwoZDNfYWJzX3VzKQpgYGAKCmBgYHtyfQpkM191c19lZmEgPC0gZmEoZDNfYWJzLCBuZmFjdG9ycyA9IDQsIHJvdGF0ZSA9ICJvYmxpbWluIikKYGBgCgpgYGB7cn0KZDNfdXNfbG9hZGluZ3MgPC0gZDNfdXNfZWZhJGxvYWRpbmdzW10gJT4lIAogIGZhLnNvcnQoKSAlPiUKICBkYXRhLmZyYW1lKCkgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJxdWVzdGlvbiIpICU+JQogIG11dGF0ZShvcmRlciA9IDE6bnJvdyguKSkgJT4lCiAgZ2F0aGVyKGZhY3RvciwgbG9hZGluZywgLXF1ZXN0aW9uLCAtb3JkZXIpCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDMsIGZpZy5hc3AgPSAxfQpkM191c19sb2FkaW5ncyAlPiUKICBtdXRhdGUocXVlc3Rpb24gPSBnc3ViKCJfYWJzIiwgIiIsIHF1ZXN0aW9uKSkgJT4lCiAgZ2dwbG90KGFlcyh4ID0gZmFjdG9yLCB5ID0gcmVvcmRlcihxdWVzdGlvbiwgZGVzYyhvcmRlcikpLCBmaWxsID0gbG9hZGluZykpICsKICBnZW9tX3RpbGUoY29sb3IgPSAiYmxhY2siKSArCiAgZ2VvbV90ZXh0KGFlcyhsYWJlbCA9IGZvcm1hdChyb3VuZChsb2FkaW5nLCAyKSwgbnNtYWxsID0gMikpLCBzaXplID0gMykgKwogIHNjYWxlX2ZpbGxfZGlzdGlsbGVyKHBhbGV0dGUgPSAiUmRZbEJ1IiwgbGltaXRzID0gYygtMSwgMSkpICsKICBsYWJzKHRpdGxlID0gIlN0dWR5IDM6IFVTIiwgeCA9ICJmYWN0b3IiLCB5ID0gInF1ZXN0aW9uIikKYGBgCgojIyMgR2hhbmEKCmBgYHtyfQpkM19hYnNfZ2ggPC0gZDNfYWJzICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigic3ViaiIpICU+JQogIGZpbHRlcihzdWJqICVpbiUgYyhkM19ieXEgJT4lIGZpbHRlcihjdHJ5ID09ICJnaGFuYSIpICU+JSBkaXN0aW5jdChzdWJqKSAlPiUgcHVsbChzdWJqKSkpICU+JQogIGNvbHVtbl90b19yb3duYW1lcygic3ViaiIpCmBgYAoKYGBge3J9CmZhLnBhcmFsbGVsKGQzX2Fic19naCkKYGBgCgpgYGB7cn0KZDNfZ2hfZWZhIDwtIGZhKGQzX2FicywgbmZhY3RvcnMgPSAyLCByb3RhdGUgPSAib2JsaW1pbiIpCmBgYAoKYGBge3J9CmQzX2doX2xvYWRpbmdzIDwtIGQzX2doX2VmYSRsb2FkaW5nc1tdICU+JSAKICBmYS5zb3J0KCkgJT4lCiAgZGF0YS5mcmFtZSgpICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigicXVlc3Rpb24iKSAlPiUKICBtdXRhdGUob3JkZXIgPSAxOm5yb3coLikpICU+JQogIGdhdGhlcihmYWN0b3IsIGxvYWRpbmcsIC1xdWVzdGlvbiwgLW9yZGVyKQpgYGAKCmBgYHtyLCBmaWcud2lkdGggPSAzLCBmaWcuYXNwID0gMX0KZDNfZ2hfbG9hZGluZ3MgJT4lCiAgbXV0YXRlKHF1ZXN0aW9uID0gZ3N1YigiX2FicyIsICIiLCBxdWVzdGlvbikpICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGV4dChhZXMobGFiZWwgPSBmb3JtYXQocm91bmQobG9hZGluZywgMiksIG5zbWFsbCA9IDIpKSwgc2l6ZSA9IDMpICsKICBzY2FsZV9maWxsX2Rpc3RpbGxlcihwYWxldHRlID0gIlJkWWxCdSIsIGxpbWl0cyA9IGMoLTEsIDEpKSArCiAgbGFicyh0aXRsZSA9ICJTdHVkeSAzOiBHaGFuYSIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKIyMjIFRoYWlsYW5kCgpgYGB7cn0KZDNfYWJzX3RoIDwtIGQzX2FicyAlPiUKICByb3duYW1lc190b19jb2x1bW4oInN1YmoiKSAlPiUKICBmaWx0ZXIoc3ViaiAlaW4lIGMoZDNfYnlxICU+JSBmaWx0ZXIoY3RyeSA9PSAidGhhaWxhbmQiKSAlPiUgZGlzdGluY3Qoc3ViaikgJT4lIHB1bGwoc3ViaikpKSAlPiUKICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmoiKQpgYGAKCmBgYHtyfQpmYS5wYXJhbGxlbChkM19hYnNfdGgpCmBgYAoKYGBge3J9CmQzX3RoX2VmYSA8LSBmYShkM19hYnMsIG5mYWN0b3JzID0gMSwgcm90YXRlID0gIm9ibGltaW4iKQpgYGAKCmBgYHtyfQpkM190aF9sb2FkaW5ncyA8LSBkM190aF9lZmEkbG9hZGluZ3NbXSAlPiUgCiAgZmEuc29ydCgpICU+JQogIGRhdGEuZnJhbWUoKSAlPiUKICByb3duYW1lc190b19jb2x1bW4oInF1ZXN0aW9uIikgJT4lCiAgbXV0YXRlKG9yZGVyID0gMTpucm93KC4pKSAlPiUKICBnYXRoZXIoZmFjdG9yLCBsb2FkaW5nLCAtcXVlc3Rpb24sIC1vcmRlcikKYGBgCgpgYGB7ciwgZmlnLndpZHRoID0gMywgZmlnLmFzcCA9IDF9CmQzX3RoX2xvYWRpbmdzICU+JQogIG11dGF0ZShxdWVzdGlvbiA9IGdzdWIoIl9hYnMiLCAiIiwgcXVlc3Rpb24pKSAlPiUKICBnZ3Bsb3QoYWVzKHggPSBmYWN0b3IsIHkgPSByZW9yZGVyKHF1ZXN0aW9uLCBkZXNjKG9yZGVyKSksIGZpbGwgPSBsb2FkaW5nKSkgKwogIGdlb21fdGlsZShjb2xvciA9ICJibGFjayIpICsKICBnZW9tX3RleHQoYWVzKGxhYmVsID0gZm9ybWF0KHJvdW5kKGxvYWRpbmcsIDIpLCBuc21hbGwgPSAyKSksIHNpemUgPSAzKSArCiAgc2NhbGVfZmlsbF9kaXN0aWxsZXIocGFsZXR0ZSA9ICJSZFlsQnUiLCBsaW1pdHMgPSBjKC0xLCAxKSkgKwogIGxhYnModGl0bGUgPSAiU3R1ZHkgMzogVGhhaWxhbmQiLCB4ID0gImZhY3RvciIsIHkgPSAicXVlc3Rpb24iKQpgYGAKCiMjIyBDaGluYQoKYGBge3J9CmQzX2Fic19jaCA8LSBkM19hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqIikgJT4lCiAgZmlsdGVyKHN1YmogJWluJSBjKGQzX2J5cSAlPiUgZmlsdGVyKGN0cnkgPT0gImNoaW5hIikgJT4lIGRpc3RpbmN0KHN1YmopICU+JSBwdWxsKHN1YmopKSkgJT4lCiAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqIikKYGBgCgpgYGB7cn0KZmEucGFyYWxsZWwoZDNfYWJzX2NoKQpgYGAKCmBgYHtyfQpkM19jaF9lZmEgPC0gZmEoZDNfYWJzLCBuZmFjdG9ycyA9IDIsIHJvdGF0ZSA9ICJvYmxpbWluIikKYGBgCgpgYGB7cn0KZDNfY2hfbG9hZGluZ3MgPC0gZDNfY2hfZWZhJGxvYWRpbmdzW10gJT4lIAogIGZhLnNvcnQoKSAlPiUKICBkYXRhLmZyYW1lKCkgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJxdWVzdGlvbiIpICU+JQogIG11dGF0ZShvcmRlciA9IDE6bnJvdyguKSkgJT4lCiAgZ2F0aGVyKGZhY3RvciwgbG9hZGluZywgLXF1ZXN0aW9uLCAtb3JkZXIpCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDMsIGZpZy5hc3AgPSAxfQpkM19jaF9sb2FkaW5ncyAlPiUKICBtdXRhdGUocXVlc3Rpb24gPSBnc3ViKCJfYWJzIiwgIiIsIHF1ZXN0aW9uKSkgJT4lCiAgZ2dwbG90KGFlcyh4ID0gZmFjdG9yLCB5ID0gcmVvcmRlcihxdWVzdGlvbiwgZGVzYyhvcmRlcikpLCBmaWxsID0gbG9hZGluZykpICsKICBnZW9tX3RpbGUoY29sb3IgPSAiYmxhY2siKSArCiAgZ2VvbV90ZXh0KGFlcyhsYWJlbCA9IGZvcm1hdChyb3VuZChsb2FkaW5nLCAyKSwgbnNtYWxsID0gMikpLCBzaXplID0gMykgKwogIHNjYWxlX2ZpbGxfZGlzdGlsbGVyKHBhbGV0dGUgPSAiUmRZbEJ1IiwgbGltaXRzID0gYygtMSwgMSkpICsKICBsYWJzKHRpdGxlID0gIlN0dWR5IDM6IENoaW5hIiwgeCA9ICJmYWN0b3IiLCB5ID0gInF1ZXN0aW9uIikKYGBgCgojIyMgVmFudWF0dQoKYGBge3J9CmQzX2Fic192dCA8LSBkM19hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqIikgJT4lCiAgZmlsdGVyKHN1YmogJWluJSBjKGQzX2J5cSAlPiUgZmlsdGVyKGN0cnkgPT0gInZhbnVhdHUiKSAlPiUgZGlzdGluY3Qoc3ViaikgJT4lIHB1bGwoc3ViaikpKSAlPiUKICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmoiKQpgYGAKCmBgYHtyfQpmYS5wYXJhbGxlbChkM19hYnNfdnQpCmBgYAoKYGBge3J9CmQzX3Z0X2VmYSA8LSBmYShkM19hYnMsIG5mYWN0b3JzID0gMiwgcm90YXRlID0gIm9ibGltaW4iKQpgYGAKCmBgYHtyfQpkM192dF9sb2FkaW5ncyA8LSBkM192dF9lZmEkbG9hZGluZ3NbXSAlPiUgCiAgZmEuc29ydCgpICU+JQogIGRhdGEuZnJhbWUoKSAlPiUKICByb3duYW1lc190b19jb2x1bW4oInF1ZXN0aW9uIikgJT4lCiAgbXV0YXRlKG9yZGVyID0gMTpucm93KC4pKSAlPiUKICBnYXRoZXIoZmFjdG9yLCBsb2FkaW5nLCAtcXVlc3Rpb24sIC1vcmRlcikKYGBgCgpgYGB7ciwgZmlnLndpZHRoID0gMywgZmlnLmFzcCA9IDF9CmQzX3Z0X2xvYWRpbmdzICU+JQogIG11dGF0ZShxdWVzdGlvbiA9IGdzdWIoIl9hYnMiLCAiIiwgcXVlc3Rpb24pKSAlPiUKICBnZ3Bsb3QoYWVzKHggPSBmYWN0b3IsIHkgPSByZW9yZGVyKHF1ZXN0aW9uLCBkZXNjKG9yZGVyKSksIGZpbGwgPSBsb2FkaW5nKSkgKwogIGdlb21fdGlsZShjb2xvciA9ICJibGFjayIpICsKICBnZW9tX3RleHQoYWVzKGxhYmVsID0gZm9ybWF0KHJvdW5kKGxvYWRpbmcsIDIpLCBuc21hbGwgPSAyKSksIHNpemUgPSAzKSArCiAgc2NhbGVfZmlsbF9kaXN0aWxsZXIocGFsZXR0ZSA9ICJSZFlsQnUiLCBsaW1pdHMgPSBjKC0xLCAxKSkgKwogIGxhYnModGl0bGUgPSAiU3R1ZHkgMzogVmFudWF0dSIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKIyMgU3R1ZHkgNAoKIyMjIEFsbCBzaXRlcwoKYGBge3J9CmQ0X2FicyA8LSBkNF9ieXEgJT4lCiAgc2VsZWN0KHA3X3N1YmosIGNvbnRhaW5zKCJfYWJzXyIpKSAlPiUKICBzZWxlY3QoLWVuZHNfd2l0aCgiY2F0IiksIC1lbmRzX3dpdGgoInRvdGFsIiksIC1jb250YWlucygiX2NoZWNrIikpICU+JQogIGNvbHVtbl90b19yb3duYW1lcygicDdfc3ViaiIpCmBgYAoKYGBge3J9CmZhLnBhcmFsbGVsKGQ0X2FicykKYGBgCgpgYGB7cn0KZDRfYWxsX2VmYSA8LSBmYShkNF9hYnMsIG5mYWN0b3JzID0gNCwgcm90YXRlID0gIm9ibGltaW4iKQpgYGAKCmBgYHtyfQpkNF9hbGxfbG9hZGluZ3MgPC0gZDRfYWxsX2VmYSRsb2FkaW5nc1tdICU+JSAKICBmYS5zb3J0KCkgJT4lCiAgZGF0YS5mcmFtZSgpICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigicXVlc3Rpb24iKSAlPiUKICBtdXRhdGUob3JkZXIgPSAxOm5yb3coLikpICU+JQogIGdhdGhlcihmYWN0b3IsIGxvYWRpbmcsIC1xdWVzdGlvbiwgLW9yZGVyKQpgYGAKCmBgYHtyLCBmaWcud2lkdGggPSAzLCBmaWcuYXNwID0gMX0KZDRfYWxsX2xvYWRpbmdzICU+JQogIG11dGF0ZShxdWVzdGlvbiA9IGdzdWIoIl9hYnMiLCAiIiwgcXVlc3Rpb24pLAogICAgICAgICBxdWVzdGlvbiA9IGdzdWIoInA3XyIsICIiLCBxdWVzdGlvbikpICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGV4dChhZXMobGFiZWwgPSBmb3JtYXQocm91bmQobG9hZGluZywgMiksIG5zbWFsbCA9IDIpKSwgc2l6ZSA9IDMpICsKICBzY2FsZV9maWxsX2Rpc3RpbGxlcihwYWxldHRlID0gIlJkWWxCdSIsIGxpbWl0cyA9IGMoLTEsIDEpKSArCiAgbGFicyh0aXRsZSA9ICJTdHVkeSA0OiBBbGwgc2l0ZXMiLCB4ID0gImZhY3RvciIsIHkgPSAicXVlc3Rpb24iKQpgYGAKCiMjIyBVUwoKYGBge3J9CmQ0X2Fic191cyA8LSBkNF9hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJwN19zdWJqIikgJT4lCiAgZmlsdGVyKHA3X3N1YmogJWluJSBjKGQ0X2J5cSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKHA3X2N0cnkgPT0gIlVTIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgIGRpc3RpbmN0KHA3X3N1YmopICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHA3X3N1YmopKSkgJT4lCiAgY29sdW1uX3RvX3Jvd25hbWVzKCJwN19zdWJqIikKYGBgCgpgYGB7cn0KZmEucGFyYWxsZWwoZDRfYWJzX3VzKQpgYGAKCmBgYHtyfQpkNF91c19lZmEgPC0gZmEoZDRfYWJzX3VzLCBuZmFjdG9ycyA9IDIsIHJvdGF0ZSA9ICJvYmxpbWluIikKYGBgCgpgYGB7cn0KZDRfdXNfbG9hZGluZ3MgPC0gZDRfdXNfZWZhJGxvYWRpbmdzW10gJT4lIAogIGZhLnNvcnQoKSAlPiUKICBkYXRhLmZyYW1lKCkgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJxdWVzdGlvbiIpICU+JQogIG11dGF0ZShvcmRlciA9IDE6bnJvdyguKSkgJT4lCiAgZ2F0aGVyKGZhY3RvciwgbG9hZGluZywgLXF1ZXN0aW9uLCAtb3JkZXIpCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDMsIGZpZy5hc3AgPSAxfQpkNF91c19sb2FkaW5ncyAlPiUKICBtdXRhdGUocXVlc3Rpb24gPSBnc3ViKCJfYWJzIiwgIiIsIHF1ZXN0aW9uKSwKICAgICAgICAgcXVlc3Rpb24gPSBnc3ViKCJwN18iLCAiIiwgcXVlc3Rpb24pKSAlPiUKICBnZ3Bsb3QoYWVzKHggPSBmYWN0b3IsIHkgPSByZW9yZGVyKHF1ZXN0aW9uLCBkZXNjKG9yZGVyKSksIGZpbGwgPSBsb2FkaW5nKSkgKwogIGdlb21fdGlsZShjb2xvciA9ICJibGFjayIpICsKICBnZW9tX3RleHQoYWVzKGxhYmVsID0gZm9ybWF0KHJvdW5kKGxvYWRpbmcsIDIpLCBuc21hbGwgPSAyKSksIHNpemUgPSAzKSArCiAgc2NhbGVfZmlsbF9kaXN0aWxsZXIocGFsZXR0ZSA9ICJSZFlsQnUiLCBsaW1pdHMgPSBjKC0xLCAxKSkgKwogIGxhYnModGl0bGUgPSAiU3R1ZHkgNDogVVMiLCB4ID0gImZhY3RvciIsIHkgPSAicXVlc3Rpb24iKQpgYGAKCiMjIyBHaGFuYQoKYGBge3J9CmQ0X2Fic19naCA8LSBkNF9hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJwN19zdWJqIikgJT4lCiAgZmlsdGVyKHA3X3N1YmogJWluJSBjKGQ0X2J5cSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKHA3X2N0cnkgPT0gIkdoYW5hIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgIGRpc3RpbmN0KHA3X3N1YmopICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHA3X3N1YmopKSkgJT4lCiAgY29sdW1uX3RvX3Jvd25hbWVzKCJwN19zdWJqIikKYGBgCgpgYGB7cn0KZmEucGFyYWxsZWwoZDRfYWJzX2doKQpgYGAKCmBgYHtyfQpkNF9naF9lZmEgPC0gZmEoZDRfYWJzX2doLCBuZmFjdG9ycyA9IDQsIHJvdGF0ZSA9ICJvYmxpbWluIikKYGBgCgpgYGB7cn0KZDRfZ2hfbG9hZGluZ3MgPC0gZDRfZ2hfZWZhJGxvYWRpbmdzW10gJT4lIAogIGZhLnNvcnQoKSAlPiUKICBkYXRhLmZyYW1lKCkgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJxdWVzdGlvbiIpICU+JQogIG11dGF0ZShvcmRlciA9IDE6bnJvdyguKSkgJT4lCiAgZ2F0aGVyKGZhY3RvciwgbG9hZGluZywgLXF1ZXN0aW9uLCAtb3JkZXIpCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDMsIGZpZy5hc3AgPSAxfQpkNF9naF9sb2FkaW5ncyAlPiUKICBtdXRhdGUocXVlc3Rpb24gPSBnc3ViKCJfYWJzIiwgIiIsIHF1ZXN0aW9uKSwKICAgICAgICAgcXVlc3Rpb24gPSBnc3ViKCJwN18iLCAiIiwgcXVlc3Rpb24pKSAlPiUKICBnZ3Bsb3QoYWVzKHggPSBmYWN0b3IsIHkgPSByZW9yZGVyKHF1ZXN0aW9uLCBkZXNjKG9yZGVyKSksIGZpbGwgPSBsb2FkaW5nKSkgKwogIGdlb21fdGlsZShjb2xvciA9ICJibGFjayIpICsKICBnZW9tX3RleHQoYWVzKGxhYmVsID0gZm9ybWF0KHJvdW5kKGxvYWRpbmcsIDIpLCBuc21hbGwgPSAyKSksIHNpemUgPSAzKSArCiAgc2NhbGVfZmlsbF9kaXN0aWxsZXIocGFsZXR0ZSA9ICJSZFlsQnUiLCBsaW1pdHMgPSBjKC0xLCAxKSkgKwogIGxhYnModGl0bGUgPSAiU3R1ZHkgNDogR2hhbmEiLCB4ID0gImZhY3RvciIsIHkgPSAicXVlc3Rpb24iKQpgYGAKCiMjIyBUaGFpbGFuZAoKYGBge3J9CmQ0X2Fic190aCA8LSBkNF9hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJwN19zdWJqIikgJT4lCiAgZmlsdGVyKHA3X3N1YmogJWluJSBjKGQ0X2J5cSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKHA3X2N0cnkgPT0gIlRoYWlsYW5kIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgIGRpc3RpbmN0KHA3X3N1YmopICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHA3X3N1YmopKSkgJT4lCiAgY29sdW1uX3RvX3Jvd25hbWVzKCJwN19zdWJqIikKYGBgCgpgYGB7cn0KZmEucGFyYWxsZWwoZDRfYWJzX3RoKQpgYGAKCmBgYHtyfQpkNF90aF9lZmEgPC0gZmEoZDRfYWJzX3RoLCBuZmFjdG9ycyA9IDEsIHJvdGF0ZSA9ICJvYmxpbWluIikKYGBgCgpgYGB7cn0KZDRfdGhfbG9hZGluZ3MgPC0gZDRfdGhfZWZhJGxvYWRpbmdzW10gJT4lIAogIGZhLnNvcnQoKSAlPiUKICBkYXRhLmZyYW1lKCkgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJxdWVzdGlvbiIpICU+JQogIG11dGF0ZShvcmRlciA9IDE6bnJvdyguKSkgJT4lCiAgZ2F0aGVyKGZhY3RvciwgbG9hZGluZywgLXF1ZXN0aW9uLCAtb3JkZXIpCmBgYAoKYGBge3IsIGZpZy53aWR0aCA9IDMsIGZpZy5hc3AgPSAxfQpkNF90aF9sb2FkaW5ncyAlPiUKICBtdXRhdGUocXVlc3Rpb24gPSBnc3ViKCJfYWJzIiwgIiIsIHF1ZXN0aW9uKSkgJT4lCiAgZ2dwbG90KGFlcyh4ID0gZmFjdG9yLCB5ID0gcmVvcmRlcihxdWVzdGlvbiwgZGVzYyhvcmRlcikpLCBmaWxsID0gbG9hZGluZykpICsKICBnZW9tX3RpbGUoY29sb3IgPSAiYmxhY2siKSArCiAgZ2VvbV90ZXh0KGFlcyhsYWJlbCA9IGZvcm1hdChyb3VuZChsb2FkaW5nLCAyKSwgbnNtYWxsID0gMikpLCBzaXplID0gMykgKwogIHNjYWxlX2ZpbGxfZGlzdGlsbGVyKHBhbGV0dGUgPSAiUmRZbEJ1IiwgbGltaXRzID0gYygtMSwgMSkpICsKICBsYWJzKHRpdGxlID0gIlN0dWR5IDQ6IFRoYWlsYW5kIiwgeCA9ICJmYWN0b3IiLCB5ID0gInF1ZXN0aW9uIikKYGBgCgojIyMgQ2hpbmEKCmBgYHtyfQpkNF9hYnNfY2ggPC0gZDRfYWJzICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigicDdfc3ViaiIpICU+JQogIGZpbHRlcihwN19zdWJqICVpbiUgYyhkNF9ieXEgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihwN19jdHJ5ID09ICJDaGluYSIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICBkaXN0aW5jdChwN19zdWJqKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgcHVsbChwN19zdWJqKSkpICU+JQogIGNvbHVtbl90b19yb3duYW1lcygicDdfc3ViaiIpCmBgYAoKYGBge3J9CmZhLnBhcmFsbGVsKGQ0X2Fic19jaCkKYGBgCgpgYGB7cn0KZDRfY2hfZWZhIDwtIGZhKGQ0X2Fic19jaCwgbmZhY3RvcnMgPSAxLCByb3RhdGUgPSAib2JsaW1pbiIpCmBgYAoKYGBge3J9CmQ0X2NoX2xvYWRpbmdzIDwtIGQ0X2NoX2VmYSRsb2FkaW5nc1tdICU+JSAKICBmYS5zb3J0KCkgJT4lCiAgZGF0YS5mcmFtZSgpICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigicXVlc3Rpb24iKSAlPiUKICBtdXRhdGUob3JkZXIgPSAxOm5yb3coLikpICU+JQogIGdhdGhlcihmYWN0b3IsIGxvYWRpbmcsIC1xdWVzdGlvbiwgLW9yZGVyKQpgYGAKCmBgYHtyLCBmaWcud2lkdGggPSAzLCBmaWcuYXNwID0gMX0KZDRfY2hfbG9hZGluZ3MgJT4lCiAgbXV0YXRlKHF1ZXN0aW9uID0gZ3N1YigiX2FicyIsICIiLCBxdWVzdGlvbiksCiAgICAgICAgIHF1ZXN0aW9uID0gZ3N1YigicDdfIiwgIiIsIHF1ZXN0aW9uKSkgJT4lCiAgZ2dwbG90KGFlcyh4ID0gZmFjdG9yLCB5ID0gcmVvcmRlcihxdWVzdGlvbiwgZGVzYyhvcmRlcikpLCBmaWxsID0gbG9hZGluZykpICsKICBnZW9tX3RpbGUoY29sb3IgPSAiYmxhY2siKSArCiAgZ2VvbV90ZXh0KGFlcyhsYWJlbCA9IGZvcm1hdChyb3VuZChsb2FkaW5nLCAyKSwgbnNtYWxsID0gMikpLCBzaXplID0gMykgKwogIHNjYWxlX2ZpbGxfZGlzdGlsbGVyKHBhbGV0dGUgPSAiUmRZbEJ1IiwgbGltaXRzID0gYygtMSwgMSkpICsKICBsYWJzKHRpdGxlID0gIlN0dWR5IDQ6IENoaW5hIiwgeCA9ICJmYWN0b3IiLCB5ID0gInF1ZXN0aW9uIikKYGBgCgojIyMgVmFudWF0dQoKYGBge3J9CmQ0X2Fic192dCA8LSBkNF9hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJwN19zdWJqIikgJT4lCiAgZmlsdGVyKHA3X3N1YmogJWluJSBjKGQ0X2J5cSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKHA3X2N0cnkgPT0gIlZhbnVhdHUiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgZGlzdGluY3QocDdfc3ViaikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgIHB1bGwocDdfc3ViaikpKSAlPiUKICBjb2x1bW5fdG9fcm93bmFtZXMoInA3X3N1YmoiKQpgYGAKCmBgYHtyfQpmYS5wYXJhbGxlbChkNF9hYnNfdnQpCmBgYAoKYGBge3J9CmQ0X3Z0X2VmYSA8LSBmYShkNF9hYnNfdnQsIG5mYWN0b3JzID0gNiwgcm90YXRlID0gIm9ibGltaW4iKQpgYGAKCmBgYHtyfQpkNF92dF9sb2FkaW5ncyA8LSBkNF92dF9lZmEkbG9hZGluZ3NbXSAlPiUgCiAgZmEuc29ydCgpICU+JQogIGRhdGEuZnJhbWUoKSAlPiUKICByb3duYW1lc190b19jb2x1bW4oInF1ZXN0aW9uIikgJT4lCiAgbXV0YXRlKG9yZGVyID0gMTpucm93KC4pKSAlPiUKICBnYXRoZXIoZmFjdG9yLCBsb2FkaW5nLCAtcXVlc3Rpb24sIC1vcmRlcikKYGBgCgpgYGB7ciwgZmlnLndpZHRoID0gMywgZmlnLmFzcCA9IDF9CmQ0X3Z0X2xvYWRpbmdzICU+JQogIG11dGF0ZShxdWVzdGlvbiA9IGdzdWIoIl9hYnMiLCAiIiwgcXVlc3Rpb24pLAogICAgICAgICBxdWVzdGlvbiA9IGdzdWIoInA3XyIsICIiLCBxdWVzdGlvbikpICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGV4dChhZXMobGFiZWwgPSBmb3JtYXQocm91bmQobG9hZGluZywgMiksIG5zbWFsbCA9IDIpKSwgc2l6ZSA9IDMpICsKICBzY2FsZV9maWxsX2Rpc3RpbGxlcihwYWxldHRlID0gIlJkWWxCdSIsIGxpbWl0cyA9IGMoLTEsIDEpKSArCiAgbGFicyh0aXRsZSA9ICJTdHVkeSA0OiBWYW51YXR1IiwgeCA9ICJmYWN0b3IiLCB5ID0gInF1ZXN0aW9uIikKYGBgCgojIyBBbGwgc3R1ZGllcwoKYGBge3J9CmRfYWxsX2FicyA8LSBkMV9hYnMgJT4lIAogIHJlbmFtZV9hbGwofmdzdWIoIl9hYnMiLCAiIiwgLikpICU+JQogIHJvd25hbWVzX3RvX2NvbHVtbigic3ViamVjdF9pZCIpICU+JQogIG11dGF0ZShzdHVkeSA9ICJzMSIpICU+JQogIGdhdGhlcihxdWVzdGlvbiwgcmVzcG9uc2UsIC1jKHN0dWR5LCBzdWJqZWN0X2lkKSkgJT4lCiAgZnVsbF9qb2luKGQzX2FicyAlPiUKICAgICAgICAgICAgICByb3duYW1lc190b19jb2x1bW4oInN1YmplY3RfaWQiKSAlPiUKICAgICAgICAgICAgICBtdXRhdGUoc3R1ZHkgPSAiczMiKSAlPiUKICAgICAgICAgICAgICBnYXRoZXIocXVlc3Rpb24sIHJlc3BvbnNlLCAtYyhzdHVkeSwgc3ViamVjdF9pZCkpKSAlPiUKICBmdWxsX2pvaW4oZDRfYWJzICU+JQogICAgICAgICAgICAgIHJvd25hbWVzX3RvX2NvbHVtbigic3ViamVjdF9pZCIpICU+JQogICAgICAgICAgICAgIG11dGF0ZShzdHVkeSA9ICJzNCIpICU+JQogICAgICAgICAgICAgIGdhdGhlcihxdWVzdGlvbiwgcmVzcG9uc2UsIC1jKHN0dWR5LCBzdWJqZWN0X2lkKSkgJT4lCiAgICAgICAgICAgICAgbXV0YXRlKHF1ZXN0aW9uID0gcmVjb2RlKHF1ZXN0aW9uLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX2NoaWxkLmV4cCIgPSAiY2hpbGRleHAiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX3BvZXRpYyIgPSAicG9ldGljbGFuZ3VhZ2UiLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic190di5yZWFsIiA9ICJmb3JnZXRzdXJyb3VuZGluZyIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfc2VlLmltYWdlIiA9ICJzdGFyZXBpY3R1cmUiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX21pbmQud29ybGQiID0gIm1pbmRlbnZlbG9wd29ybGQiLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic19jbG91ZHMiID0gImNsb3Vkc2hhcGVzIiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfdml2aWQuZHJlYW1zIiA9ICJ2aXZpZGRheWRyZWFtIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic19teXN0aWMuZXhwIiA9ICJteXN0aWNhbGV4cCIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX3N0ZXAub3V0c2lkZSIgPSAic3RlcG91dHNpZGVteXNlbGYiLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic190ZXh0dXJlcyIgPSAidGV4dHVyZXMiLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic190b28ucmVhbCIgPSAiZG91Ymx5cmVhbCIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX211c2ljLmF0dG4iID0gImNhdWdodHVwaW5tdXNpYyIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX2hlYXZ5LmJvZHkiID0gImhlYXZ5Ym9keSIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfc2Vuc2UucHJlc2MiID0gInNlbnNlcHJlc2VuY2UiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX2ZpcmUiID0gIndvb2RmaXJlaW1hZ2luZSIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX25hdHVyZS5hcnQiID0gImltbWVyc2VkbmF0dXJlIiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfY29sb3JzIiA9ICJjb2xvcm1lYW5pbmciLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic190aGdodC53YW5kZXIiID0gIndhbmRlcnRob3VnaHRzdGFzayIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX3ZpdmlkLnBhc3QiID0gImNsZWFycGFzdGV4cCIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX21ha2VzLnNlbnNlIiA9ICJtZWFuaW5nbGVzc3Rvb3RoZXJzIiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfYmVjb21lLmNoY3RyIiA9ICJhY3RpbmdpbnBsYXkiLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic192aXN1YWwudGhnaHRzIiA9ICJ2aXN1YWx0aG91Z2h0cyIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX3NtYWxsLnRoaW5ncyIgPSAiZGVsaWdodHNtYWxsdGhpbmdzIiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfbXVzaWMubGlmdCIgPSAib3JnYW5tdXNpYyIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX25vaXNlLm11c2ljIiA9ICJjaGFuZ2Vub2lzZSIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAicDdfYWJzX3NjZW50ZWQubWVtIiA9ICJ2aXZpZHNtZWxsbWVtb3JpZXMiLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic192aXN1YWwubXVzaWMiID0gInN5bmVzdGhlc2lhc291bmQiLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic19iZWZvcmUuc2FpZCIgPSAicHJlZGljdHdvcmRzIiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfcGh5c2ljYWwubWVtIiA9ICJwaHlzaWNhbG1lbW9yaWVzIiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfdm9pY2Uuc291bmQiID0gImZhc2NpbmF0aW5ndm9pY2UiLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic19ub3QucGh5c2ljYWwiID0gImludmlzaWJsZXByZXNlbmNlIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgInA3X2Fic190aGd0cy5pbWFnZSIgPSAic3BvbnRob3VnaHRzaW1hZ2VzIiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfb2Rvci50by5jb2xvciIgPSAic3luZXN0aGVzaWFzbWVsbCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJwN19hYnNfc3Vuc2V0IiA9ICJlbW9zdW5zZXQiKSkpICU+JQogIHVuaXRlKCJzdHVkeV9zdWIiLCBjKHN0dWR5LCBzdWJqZWN0X2lkKSkgJT4lCiAgc3ByZWFkKHF1ZXN0aW9uLCByZXNwb25zZSkgJT4lCiAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdHVkeV9zdWIiKQpgYGAKCmBgYHtyfQpmYS5wYXJhbGxlbChkX2FsbF9hYnMpCmBgYAoKYGBge3J9CmRfYWxsX2FsbF9lZmEgPC0gZmEoZF9hbGxfYWJzLCBuZmFjdG9ycyA9IDYsIHJvdGF0ZSA9ICJvYmxpbWluIikKYGBgCgpgYGB7cn0KZF9hbGxfYWxsX2xvYWRpbmdzIDwtIGRfYWxsX2FsbF9lZmEkbG9hZGluZ3NbXSAlPiUgCiAgZmEuc29ydCgpICU+JQogIGRhdGEuZnJhbWUoKSAlPiUKICByb3duYW1lc190b19jb2x1bW4oInF1ZXN0aW9uIikgJT4lCiAgbXV0YXRlKG9yZGVyID0gMTpucm93KC4pKSAlPiUKICBnYXRoZXIoZmFjdG9yLCBsb2FkaW5nLCAtcXVlc3Rpb24sIC1vcmRlcikKYGBgCgpgYGB7ciwgZmlnLndpZHRoID0gMywgZmlnLmFzcCA9IDF9CmRfYWxsX2FsbF9sb2FkaW5ncyAlPiUKICBnZ3Bsb3QoYWVzKHggPSBmYWN0b3IsIHkgPSByZW9yZGVyKHF1ZXN0aW9uLCBkZXNjKG9yZGVyKSksIGZpbGwgPSBsb2FkaW5nKSkgKwogIGdlb21fdGlsZShjb2xvciA9ICJibGFjayIpICsKICBnZW9tX3RleHQoYWVzKGxhYmVsID0gZm9ybWF0KHJvdW5kKGxvYWRpbmcsIDIpLCBuc21hbGwgPSAyKSksIHNpemUgPSAzKSArCiAgc2NhbGVfZmlsbF9kaXN0aWxsZXIocGFsZXR0ZSA9ICJSZFlsQnUiLCBsaW1pdHMgPSBjKC0xLCAxKSkgKwogIGxhYnModGl0bGUgPSAiQWxsIHN0dWRpZXM6IEFsbCBzaXRlcyIsIHggPSAiZmFjdG9yIiwgeSA9ICJxdWVzdGlvbiIpCmBgYAoKYGBge3J9CmRfYWxsX2FsbF9zY2FsZXMgPC0gZF9hbGxfYWxsX2xvYWRpbmdzICU+JQogIGdyb3VwX2J5KGZhY3RvcikgJT4lIAogIHRvcF9uKDMsIGxvYWRpbmcpICU+JQogIHVuZ3JvdXAoKQpgYGAKCmBgYHtyLCBmaWcud2lkdGggPSAzLCBmaWcuYXNwID0gMX0KZF9hbGxfYWxsX2xvYWRpbmdzICU+JQogIGdncGxvdChhZXMoeCA9IGZhY3RvciwgeSA9IHJlb3JkZXIocXVlc3Rpb24sIGRlc2Mob3JkZXIpKSwgZmlsbCA9IGxvYWRpbmcpKSArCiAgZ2VvbV90aWxlKGNvbG9yID0gImJsYWNrIikgKwogIGdlb21fdGlsZShkYXRhID0gZF9hbGxfYWxsX3NjYWxlcyAlPiUKICAgICAgICAgICAgICBtdXRhdGUoZmFjdG9ybGFiID0gcmVjb2RlX2ZhY3RvcihmYWN0b3IsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIk1SMSIgPSAiU3luZXN0aGVzaWEiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJNUjIiID0gIkFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmUiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJNUjMiID0gIkFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiTVI0IiA9ICJJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIk1SNSIgPSAiU2Vuc2VkIHByZXNlbmNlIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiTVI2IiA9ICJBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKSIpKSwKICAgICAgICAgICAgYWVzKGZpbGwgPSBOVUxMLCBjb2xvciA9IGZhY3RvcmxhYiksIGFscGhhID0gMCwgc2l6ZSA9IDEpICsKICBnZW9tX3RleHQoYWVzKGxhYmVsID0gZm9ybWF0KHJvdW5kKGxvYWRpbmcsIDIpLCBuc21hbGwgPSAyKSksIHNpemUgPSAzKSArCiAgc2NhbGVfZmlsbF9kaXN0aWxsZXIocGFsZXR0ZSA9ICJSZFlsQnUiLCBsaW1pdHMgPSBjKC0xLCAxKSkgKwogIHNjYWxlX2NvbG9yX2JyZXdlcihwYWxldHRlID0gIlNldDEiKSArCiAgbGFicyh0aXRsZSA9ICJBbGwgc3R1ZGllczogQWxsIHNpdGVzIiwgeCA9ICJmYWN0b3IiLCB5ID0gInF1ZXN0aW9uIiwKICAgICAgIGZpbGwgPSAiRmFjdG9yIGxvYWRpbmciLCBjb2xvciA9ICJNT0RUQVMgZmFjdG9yIikgKwogIHRoZW1lX21pbmltYWwoKQpgYGAKCiMgU3Vic2NhbGVzCgojIyBTdHVkeSAxCgojIyMgUmVsaWFiaWxpdHkKCmBgYHtyfQojIHJlbGlhYmlsaXR5CmJpbmRfcm93cyhNUjEgPSBzdW1tYXJ5KGFscGhhKGRfYWxsX2FicyAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByb3duYW1lc190b19jb2x1bW4oInN1YmplY3RfaWQiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGdyZXBsKCJzMV8iLCBzdWJqZWN0X2lkKSkgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqZWN0X2lkIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2VsZWN0KGRfYWxsX2FsbF9zY2FsZXMgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihmYWN0b3IgPT0gIk1SMSIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHF1ZXN0aW9uKSkpKSwKICAgICAgICAgIE1SMiA9IHN1bW1hcnkoYWxwaGEoZF9hbGxfYWJzICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJvd25hbWVzX3RvX2NvbHVtbigic3ViamVjdF9pZCIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZ3JlcGwoInMxXyIsIHN1YmplY3RfaWQpKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmplY3RfaWQiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzZWxlY3QoZF9hbGxfYWxsX3NjYWxlcyAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGZhY3RvciA9PSAiTVIyIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHB1bGwocXVlc3Rpb24pKSkpLAogICAgICAgICAgTVIzID0gc3VtbWFyeShhbHBoYShkX2FsbF9hYnMgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqZWN0X2lkIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihncmVwbCgiczFfIiwgc3ViamVjdF9pZCkpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNlbGVjdChkX2FsbF9hbGxfc2NhbGVzICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZmFjdG9yID09ICJNUjMiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcHVsbChxdWVzdGlvbikpKSksCiAgICAgICAgICBNUjQgPSBzdW1tYXJ5KGFscGhhKGRfYWxsX2FicyAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByb3duYW1lc190b19jb2x1bW4oInN1YmplY3RfaWQiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGdyZXBsKCJzMV8iLCBzdWJqZWN0X2lkKSkgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqZWN0X2lkIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2VsZWN0KGRfYWxsX2FsbF9zY2FsZXMgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihmYWN0b3IgPT0gIk1SNCIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHF1ZXN0aW9uKSkpKSwKICAgICAgICAgIE1SNSA9IHN1bW1hcnkoYWxwaGEoZF9hbGxfYWJzICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJvd25hbWVzX3RvX2NvbHVtbigic3ViamVjdF9pZCIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZ3JlcGwoInMxXyIsIHN1YmplY3RfaWQpKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmplY3RfaWQiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzZWxlY3QoZF9hbGxfYWxsX3NjYWxlcyAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGZhY3RvciA9PSAiTVI1IikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHB1bGwocXVlc3Rpb24pKSkpLAogICAgICAgICAgTVI2ID0gc3VtbWFyeShhbHBoYShkX2FsbF9hYnMgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqZWN0X2lkIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihncmVwbCgiczFfIiwgc3ViamVjdF9pZCkpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNlbGVjdChkX2FsbF9hbGxfc2NhbGVzICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZmFjdG9yID09ICJNUjYiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcHVsbChxdWVzdGlvbikpKSkpCgpgYGAKCgojIyMgUmVsYXRpb25zaGlwcyAoYW5hbG9nIHRvIFRhYmxlIFMyMCkKCmBgYHtyfQpkMV9hYnNfc3Vic2NhbGVzIDwtIGQxX2FicyAlPiUKICByb3duYW1lc190b19jb2x1bW4oInN1YmplY3RfaWQiKSAlPiUKICBnYXRoZXIocXVlc3Rpb24sIHJlc3BvbnNlLCAtc3ViamVjdF9pZCkgJT4lCiAgbXV0YXRlKHF1ZXN0aW9uID0gZ3N1YigiX2FicyIsICIiLCBxdWVzdGlvbikpICU+JQogIGxlZnRfam9pbihkX2FsbF9hbGxfc2NhbGVzICU+JSBkaXN0aW5jdChxdWVzdGlvbiwgZmFjdG9yKSkgJT4lIAogIGZpbHRlcighaXMubmEoZmFjdG9yKSkgJT4lCiAgbXV0YXRlKGZhY3RvcmxhYiA9IHJlY29kZV9mYWN0b3IoZmFjdG9yLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJNUjEiID0gIlN5bmVzdGhlc2lhIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiTVIyIiA9ICJBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiTVIzIiA9ICJBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChhKSIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIk1SNCIgPSAiSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJNUjUiID0gIlNlbnNlZCBwcmVzZW5jZSIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIk1SNiIgPSAiQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYikiKSkgJT4lIAogIGdyb3VwX2J5KHN1YmplY3RfaWQsIGZhY3RvciwgZmFjdG9ybGFiKSAlPiUKICBzdW1tYXJpc2Uoc2NvcmUgPSBtZWFuKHJlc3BvbnNlLCBuYS5ybSA9IFQpKSAlPiUKICB1bmdyb3VwKCkgJT4lCiAgbXV0YXRlKHN1YmplY3RfaWQgPSBhcy5udW1lcmljKHN1YmplY3RfaWQpKSAlPiUKICBsZWZ0X2pvaW4oZDEgJT4lIGRpc3RpbmN0KHN1YmplY3RfaWQsIGNvdW50cnkpKSAlPiUKICBncm91cF9ieShjb3VudHJ5LCBmYWN0b3IsIGZhY3RvcmxhYikgJT4lCiAgbXV0YXRlKHNjb3JlID0gc2NhbGUoc2NvcmUpKSAlPiUKICB1bmdyb3VwKCkgJT4lCiAgc2VsZWN0KC1jb3VudHJ5LCAtZmFjdG9yKSAlPiUKICBzcHJlYWQoZmFjdG9ybGFiLCBzY29yZSkgJT4lCiAgbXV0YXRlX2FsbChhcy5udW1lcmljKSAlPiUKICBsZWZ0X2pvaW4oZDFfZm9ydGFiKQpgYGAKCmBgYHtyfQojIHIxMDRfc3BldiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgUG9yb3NpdHkgVmlnbmV0dGVzYCwKIyAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKCnIxMDVfc3Bldl9NUjEgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gU3luZXN0aGVzaWEsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19zdWJzY2FsZXMpCnIxMDVfc3Bldl9NUjIgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTA1X3NwZXZfTVIzIDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChhKWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19zdWJzY2FsZXMpCnIxMDVfc3Bldl9NUjQgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gYEltYWdpbmF0aXZlIGludm9sdmVtZW50YCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwNV9zcGV2X01SNSA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgU2Vuc2VkIHByZXNlbmNlYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwNV9zcGV2X01SNiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYilgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQoKcjEwNl9zcGV2X01SMSA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIFN5bmVzdGhlc2lhLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTA2X3NwZXZfTVIyIDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTA2X3NwZXZfTVIzIDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwNl9zcGV2X01SNCA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIGBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19zdWJzY2FsZXMpCnIxMDZfc3Bldl9NUjUgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBgU2Vuc2VkIHByZXNlbmNlYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwNl9zcGV2X01SNiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19zdWJzY2FsZXMpCgojIHIxMDdfc3BldiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAojICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2AgKyBDb3VudHJ5OmBQb3Jvc2l0eSBWaWduZXR0ZXNgLAojICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQoKcjEwOF9zcGV2X01SMSA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgICsgU3luZXN0aGVzaWEgKyBDb3VudHJ5OlN5bmVzdGhlc2lhLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTA4X3NwZXZfTVIyIDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBTaXRlICogUmVsaWdpb24gCiAgICAgICAgICAgICAgICAgICAgKyBgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAgKyBDb3VudHJ5OmBBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwOF9zcGV2X01SMyA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgICsgYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYCArIENvdW50cnk6YEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwOF9zcGV2X01SNCA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgICsgYEltYWdpbmF0aXZlIGludm9sdmVtZW50YCArIENvdW50cnk6YEltYWdpbmF0aXZlIGludm9sdmVtZW50YCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwOF9zcGV2X01SNSA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgICsgYFNlbnNlZCBwcmVzZW5jZWAgKyBDb3VudHJ5OmBTZW5zZWQgcHJlc2VuY2VgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTA4X3NwZXZfTVI2IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBTaXRlICogUmVsaWdpb24gCiAgICAgICAgICAgICAgICAgICAgKyBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYilgICsgQ291bnRyeTpgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYilgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQoKcjEwOV9zcGV2X01SMSA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2AgKyBDb3VudHJ5OmBQb3Jvc2l0eSBWaWduZXR0ZXNgCiAgICAgICAgICAgICAgICAgICAgKyBTeW5lc3RoZXNpYSArIENvdW50cnk6U3luZXN0aGVzaWEKICAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgOlN5bmVzdGhlc2lhIAogICAgICAgICAgICAgICAgICAgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYDpTeW5lc3RoZXNpYSwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwOV9zcGV2X01SMiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2AgKyBDb3VudHJ5OmBQb3Jvc2l0eSBWaWduZXR0ZXNgCiAgICAgICAgICAgICAgICAgICAgKyBgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAgKyBDb3VudHJ5OmBBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlYAogICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2A6YEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgIAogICAgICAgICAgICAgICAgICAgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYDpgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19zdWJzY2FsZXMpCnIxMDlfc3Bldl9NUjMgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIFNpdGUgKiBSZWxpZ2lvbiAKICAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYAogICAgICAgICAgICAgICAgICAgICsgYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYCArIENvdW50cnk6YEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYAogICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2A6YEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYCAKICAgICAgICAgICAgICAgICAgICArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2A6YEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjEwOV9zcGV2X01SNCA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2AgKyBDb3VudHJ5OmBQb3Jvc2l0eSBWaWduZXR0ZXNgCiAgICAgICAgICAgICAgICAgICAgKyBgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgICsgQ291bnRyeTpgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgCiAgICAgICAgICAgICAgICAgICAgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYDpgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgIAogICAgICAgICAgICAgICAgICAgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYDpgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTA5X3NwZXZfTVI1IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBTaXRlICogUmVsaWdpb24gCiAgICAgICAgICAgICAgICAgICAgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2AKICAgICAgICAgICAgICAgICAgICArIGBTZW5zZWQgcHJlc2VuY2VgICsgQ291bnRyeTpgU2Vuc2VkIHByZXNlbmNlYAogICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2A6YFNlbnNlZCBwcmVzZW5jZWAgCiAgICAgICAgICAgICAgICAgICAgKyBDb3VudHJ5OmBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBTZW5zZWQgcHJlc2VuY2VgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTA5X3NwZXZfTVI2IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBTaXRlICogUmVsaWdpb24gCiAgICAgICAgICAgICAgICAgICAgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2AKICAgICAgICAgICAgICAgICAgICArIGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAgKyBDb3VudHJ5OmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAKICAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAgCiAgICAgICAgICAgICAgICAgICAgKyBDb3VudHJ5OmBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQxX2Fic19zdWJzY2FsZXMpCgpyMTEwX3NwZXZfTVIxIDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBTaXRlICogUmVsaWdpb24gCiAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYAogICAgICAgICAgICAgICAgICAgKyBTeW5lc3RoZXNpYSArIENvdW50cnk6U3luZXN0aGVzaWEKICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2A6U3luZXN0aGVzaWEKICAgICAgICAgICAgICAgICAgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYDpTeW5lc3RoZXNpYQogICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UgKyBFZHVjYXRpb24sCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjExMF9zcGV2X01SMiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2AKICAgICAgICAgICAgICAgICAgICsgYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgICsgQ291bnRyeTpgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAKICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2A6YEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgCiAgICAgICAgICAgICAgICAgICArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2A6YEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgCiAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSArIEVkdWNhdGlvbiwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTEwX3NwZXZfTVIzIDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBTaXRlICogUmVsaWdpb24gCiAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYAogICAgICAgICAgICAgICAgICAgKyBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSlgICsgQ291bnRyeTpgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSlgCiAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChhKWAKICAgICAgICAgICAgICAgICAgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYDpgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSlgCiAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSArIEVkdWNhdGlvbiwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTEwX3NwZXZfTVI0IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBTaXRlICogUmVsaWdpb24gCiAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYAogICAgICAgICAgICAgICAgICAgKyBgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgICsgQ291bnRyeTpgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgCiAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAKICAgICAgICAgICAgICAgICAgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYDpgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgCiAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSArIEVkdWNhdGlvbiwKICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkMV9hYnNfc3Vic2NhbGVzKQpyMTEwX3NwZXZfTVI1IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBTaXRlICogUmVsaWdpb24gCiAgICAgICAgICAgICAgICAgICArIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYAogICAgICAgICAgICAgICAgICAgKyBgU2Vuc2VkIHByZXNlbmNlYCArIENvdW50cnk6YFNlbnNlZCBwcmVzZW5jZWAKICAgICAgICAgICAgICAgICAgICsgYFBvcm9zaXR5IFZpZ25ldHRlc2A6YFNlbnNlZCBwcmVzZW5jZWAKICAgICAgICAgICAgICAgICAgICsgQ291bnRyeTpgUG9yb3NpdHkgVmlnbmV0dGVzYDpgU2Vuc2VkIHByZXNlbmNlYAogICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UgKyBFZHVjYXRpb24sCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKcjExMF9zcGV2X01SNiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogU2l0ZSAqIFJlbGlnaW9uIAogICAgICAgICAgICAgICAgICAgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYCArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2AKICAgICAgICAgICAgICAgICAgICsgYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYCArIENvdW50cnk6YEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYAogICAgICAgICAgICAgICAgICAgKyBgUG9yb3NpdHkgVmlnbmV0dGVzYDpgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYilgCiAgICAgICAgICAgICAgICAgICArIENvdW50cnk6YFBvcm9zaXR5IFZpZ25ldHRlc2A6YEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYAogICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UgKyBFZHVjYXRpb24sCiAgICAgICAgICAgICAgICAgICBkYXRhID0gZDFfYWJzX3N1YnNjYWxlcykKYGBgCgpgYGB7ciwgaW5jbHVkZSA9IEZ9CiMgIyBydW4gbWFudWFsbHkgdG8gY2hlY2sgY29udmVyZ2VuY2UKIyAjIHN1bW1hcnkocjEwNF9zcGV2KQojIHN1bW1hcnkocjEwNV9zcGV2KQojIHN1bW1hcnkocjEwNl9zcGV2KQojICMgc3VtbWFyeShyMTA3X3NwZXYpCiMgc3VtbWFyeShyMTA4X3NwZXYpCiMgc3VtbWFyeShyMTA5X3NwZXYpCiMgc3VtbWFyeShyMTEwX3NwZXYpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3MyMF9zdWJzY2FsZXMgPC0gc3RhcmdhemVyKAogICNyMTA0X3NwZXYsIAogIHIxMDVfc3Bldl9NUjEsIHIxMDVfc3Bldl9NUjIsIHIxMDVfc3Bldl9NUjMsIHIxMDVfc3Bldl9NUjQsIHIxMDVfc3Bldl9NUjUsIHIxMDVfc3Bldl9NUjYsCiAgcjEwNl9zcGV2X01SMSwgcjEwNl9zcGV2X01SMiwgcjEwNl9zcGV2X01SMywgcjEwNl9zcGV2X01SNCwgcjEwNl9zcGV2X01SNSwgcjEwNl9zcGV2X01SNiwKICAjcjEwN19zcGV2LCAKICByMTA4X3NwZXZfTVIxLCByMTA4X3NwZXZfTVIyLCByMTA4X3NwZXZfTVIzLCByMTA4X3NwZXZfTVI0LCByMTA4X3NwZXZfTVI1LCByMTA4X3NwZXZfTVI2LAogIHIxMDlfc3Bldl9NUjEsIHIxMDlfc3Bldl9NUjIsIHIxMDlfc3Bldl9NUjMsIHIxMDlfc3Bldl9NUjQsIHIxMDlfc3Bldl9NUjUsIHIxMDlfc3Bldl9NUjYsCiAgcjExMF9zcGV2X01SMSwgcjExMF9zcGV2X01SMiwgcjExMF9zcGV2X01SMywgcjExMF9zcGV2X01SNCwgcjExMF9zcGV2X01SNSwgcjExMF9zcGV2X01SNiwKICB0eXBlID0gImh0bWwiLAogIGNpID0gVCwKICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgZGlnaXRzID0gMiwKICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICMgb3JkZXIgPSBjKCJeYFBvcm9zaXR5IFZpZ25ldHRlc2AkIiwKICAjICAgICAgICAgICAiXkFic29ycHRpb24kIiwKICAjICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOkFic29ycHRpb24kIiksCiAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICBzaW5nbGUucm93ID0gVCkKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3MyMF9zdWJzY2FsZXMpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MyMF9zdWJzY2FsZXMuaHRtbCIpCmBgYAoKYGBge3J9CiMgaHRtbHRvb2xzOjppbmNsdWRlSFRNTCgiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MyMF9zdWJzY2FsZXMuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3MyMF9zdWJzY2FsZXNfTVIxIDwtIHN0YXJnYXplcigjcjEwNF9zcGV2LAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcjEwNV9zcGV2X01SMSwgcjEwNl9zcGV2X01SMSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAjcjEwN19zcGV2LCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMDhfc3Bldl9NUjEsIHIxMDlfc3Bldl9NUjEsIHIxMTBfc3Bldl9NUjEsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgVmlnbmV0dGVzYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeU3luZXN0aGVzaWEkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOlN5bmVzdGhlc2lhJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczIwX3N1YnNjYWxlc19NUjEpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MyMF9zdWJzY2FsZXNfTVIxLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczIwX3N1YnNjYWxlc19NUjEuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3MyMF9zdWJzY2FsZXNfTVIyIDwtIHN0YXJnYXplcigjcjEwNF9zcGV2LAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcjEwNV9zcGV2X01SMiwgcjEwNl9zcGV2X01SMiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAjcjEwN19zcGV2LCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMDhfc3Bldl9NUjIsIHIxMDlfc3Bldl9NUjIsIHIxMTBfc3Bldl9NUjIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgVmlnbmV0dGVzYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgVmlnbmV0dGVzYDpgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAkIiksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpCgpjYXQoc3ViX2ludGVyYWN0X2Z1bih0YWJsZV9zMjBfc3Vic2NhbGVzX01SMiksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczIwX3N1YnNjYWxlc19NUjIuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMjBfc3Vic2NhbGVzX01SMi5odG1sIikKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczIwX3N1YnNjYWxlc19NUjMgPC0gc3RhcmdhemVyKCNyMTA0X3NwZXYsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTA1X3NwZXZfTVIzLCByMTA2X3NwZXZfTVIzLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICNyMTA3X3NwZXYsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcjEwOF9zcGV2X01SMywgcjEwOV9zcGV2X01SMywgcjExMF9zcGV2X01SMywgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcmVwb3J0ID0gYygidmNzcCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyBcXChhXFwpYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFZpZ25ldHRlc2A6YEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgXFwoYVxcKWAkIiksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpCgpjYXQoc3ViX2ludGVyYWN0X2Z1bih0YWJsZV9zMjBfc3Vic2NhbGVzX01SMyksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczIwX3N1YnNjYWxlc19NUjMuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMjBfc3Vic2NhbGVzX01SMy5odG1sIikKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczIwX3N1YnNjYWxlc19NUjQgPC0gc3RhcmdhemVyKCNyMTA0X3NwZXYsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTA1X3NwZXZfTVI0LCByMTA2X3NwZXZfTVI0LCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICNyMTA3X3NwZXYsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcjEwOF9zcGV2X01SNCwgcjEwOV9zcGV2X01SNCwgcjExMF9zcGV2X01SNCwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcmVwb3J0ID0gYygidmNzcCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgVmlnbmV0dGVzYDpgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczIwX3N1YnNjYWxlc19NUjQpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MyMF9zdWJzY2FsZXNfTVI0Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczIwX3N1YnNjYWxlc19NUjQuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3MyMF9zdWJzY2FsZXNfTVI1IDwtIHN0YXJnYXplcigjcjEwNF9zcGV2LAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcjEwNV9zcGV2X01SNSwgcjEwNl9zcGV2X01SNSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAjcjEwN19zcGV2LCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMDhfc3Bldl9NUjUsIHIxMDlfc3Bldl9NUjUsIHIxMTBfc3Bldl9NUjUsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgVmlnbmV0dGVzYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFNlbnNlZCBwcmVzZW5jZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBTZW5zZWQgcHJlc2VuY2VgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczIwX3N1YnNjYWxlc19NUjUpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MyMF9zdWJzY2FsZXNfTVI1Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczIwX3N1YnNjYWxlc19NUjUuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3MyMF9zdWJzY2FsZXNfTVI2IDwtIHN0YXJnYXplcigjcjEwNF9zcGV2LAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcjEwNV9zcGV2X01SNiwgcjEwNl9zcGV2X01SNiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAjcjEwN19zcGV2LCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMDhfc3Bldl9NUjYsIHIxMDlfc3Bldl9NUjYsIHIxMTBfc3Bldl9NUjYsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gUG9yb3NpdHkgVmlnbmV0dGVzYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgXFwoYlxcKWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGJcXClgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczIwX3N1YnNjYWxlc19NUjYpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MyMF9zdWJzY2FsZXNfTVI2Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczIwX3N1YnNjYWxlc19NUjYuaHRtbCIpCmBgYAoKIyMgU3R1ZHkgMwoKIyMjIFJlbGlhYmlsaXR5CgpgYGB7cn0KIyByZWxpYWJpbGl0eQpiaW5kX3Jvd3MoTVIxID0gc3VtbWFyeShhbHBoYShkX2FsbF9hYnMgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqZWN0X2lkIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihncmVwbCgiczNfIiwgc3ViamVjdF9pZCkpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNlbGVjdChkX2FsbF9hbGxfc2NhbGVzICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZmFjdG9yID09ICJNUjEiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcHVsbChxdWVzdGlvbikpKSksCiAgICAgICAgICBNUjIgPSBzdW1tYXJ5KGFscGhhKGRfYWxsX2FicyAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByb3duYW1lc190b19jb2x1bW4oInN1YmplY3RfaWQiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGdyZXBsKCJzM18iLCBzdWJqZWN0X2lkKSkgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqZWN0X2lkIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2VsZWN0KGRfYWxsX2FsbF9zY2FsZXMgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihmYWN0b3IgPT0gIk1SMiIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHF1ZXN0aW9uKSkpKSwKICAgICAgICAgIE1SMyA9IHN1bW1hcnkoYWxwaGEoZF9hbGxfYWJzICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJvd25hbWVzX3RvX2NvbHVtbigic3ViamVjdF9pZCIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZ3JlcGwoInMzXyIsIHN1YmplY3RfaWQpKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmplY3RfaWQiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzZWxlY3QoZF9hbGxfYWxsX3NjYWxlcyAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGZhY3RvciA9PSAiTVIzIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHB1bGwocXVlc3Rpb24pKSkpLAogICAgICAgICAgTVI0ID0gc3VtbWFyeShhbHBoYShkX2FsbF9hYnMgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqZWN0X2lkIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihncmVwbCgiczNfIiwgc3ViamVjdF9pZCkpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNlbGVjdChkX2FsbF9hbGxfc2NhbGVzICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZmFjdG9yID09ICJNUjQiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcHVsbChxdWVzdGlvbikpKSksCiAgICAgICAgICBNUjUgPSBzdW1tYXJ5KGFscGhhKGRfYWxsX2FicyAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByb3duYW1lc190b19jb2x1bW4oInN1YmplY3RfaWQiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGdyZXBsKCJzM18iLCBzdWJqZWN0X2lkKSkgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqZWN0X2lkIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2VsZWN0KGRfYWxsX2FsbF9zY2FsZXMgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihmYWN0b3IgPT0gIk1SNSIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHF1ZXN0aW9uKSkpKSwKICAgICAgICAgIE1SNiA9IHN1bW1hcnkoYWxwaGEoZF9hbGxfYWJzICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJvd25hbWVzX3RvX2NvbHVtbigic3ViamVjdF9pZCIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZ3JlcGwoInMzXyIsIHN1YmplY3RfaWQpKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmplY3RfaWQiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzZWxlY3QoZF9hbGxfYWxsX3NjYWxlcyAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGZhY3RvciA9PSAiTVI2IikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHB1bGwocXVlc3Rpb24pKSkpKQoKYGBgCgoKIyMjIFJlbGF0aW9uc2hpcHMgKGFuYWxvZyB0byBUYWJsZSBTMzIpCgpgYGB7cn0KZDNfYWJzX3N1YnNjYWxlcyA8LSBkM19hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqZWN0X2lkIikgJT4lCiAgZ2F0aGVyKHF1ZXN0aW9uLCByZXNwb25zZSwgLXN1YmplY3RfaWQpICU+JQogIG11dGF0ZShxdWVzdGlvbiA9IGdzdWIoIl9hYnMiLCAiIiwgcXVlc3Rpb24pKSAlPiUKICBsZWZ0X2pvaW4oZF9hbGxfYWxsX3NjYWxlcyAlPiUgZGlzdGluY3QocXVlc3Rpb24sIGZhY3RvcikpICU+JSAKICBmaWx0ZXIoIWlzLm5hKGZhY3RvcikpICU+JQogIG11dGF0ZShmYWN0b3JsYWIgPSByZWNvZGVfZmFjdG9yKGZhY3RvciwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiTVIxIiA9ICJTeW5lc3RoZXNpYSIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIk1SMiIgPSAiQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZSIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIk1SMyIgPSAiQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSkiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJNUjQiID0gIkltYWdpbmF0aXZlIGludm9sdmVtZW50IiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiTVI1IiA9ICJTZW5zZWQgcHJlc2VuY2UiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJNUjYiID0gIkFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpIikpICU+JSAKICBncm91cF9ieShzdWJqZWN0X2lkLCBmYWN0b3IsIGZhY3RvcmxhYikgJT4lCiAgc3VtbWFyaXNlKHNjb3JlID0gbWVhbihyZXNwb25zZSwgbmEucm0gPSBUKSkgJT4lCiAgdW5ncm91cCgpICU+JQogIG11dGF0ZShzdWJqZWN0X2lkID0gYXMubnVtZXJpYyhzdWJqZWN0X2lkKSkgJT4lCiAgbGVmdF9qb2luKGQzICU+JSBkaXN0aW5jdChzdWJqZWN0X2lkLCBjb3VudHJ5KSkgJT4lCiAgZ3JvdXBfYnkoY291bnRyeSwgZmFjdG9yLCBmYWN0b3JsYWIpICU+JQogIG11dGF0ZShzY29yZSA9IHNjYWxlKHNjb3JlKSkgJT4lCiAgdW5ncm91cCgpICU+JQogIHNlbGVjdCgtY291bnRyeSwgLWZhY3RvcikgJT4lCiAgc3ByZWFkKGZhY3RvcmxhYiwgc2NvcmUpICU+JQogIG11dGF0ZV9hbGwoYXMubnVtZXJpYykgJT4lCiAgbGVmdF9qb2luKGQzX2ZvcnRhYikKYGBgCgpgYGB7cn0KcjEwM19zcGV2X01SMSA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgU3luZXN0aGVzaWFgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTAzX3NwZXZfTVIyIDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwM19zcGV2X01SMyA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSlgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTAzX3NwZXZfTVI0IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IGBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDNfc3Bldl9NUjUgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gYFNlbnNlZCBwcmVzZW5jZWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDNfc3Bldl9NUjYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKCnIxMDRfc3Bldl9NUjEgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIGBTeW5lc3RoZXNpYWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDRfc3Bldl9NUjIgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIGBBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwNF9zcGV2X01SMyA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwNF9zcGV2X01SNCA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogYEltYWdpbmF0aXZlIGludm9sdmVtZW50YCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwNF9zcGV2X01SNSA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogYFNlbnNlZCBwcmVzZW5jZWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDRfc3Bldl9NUjYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCgpyMTA1X3NwZXZfTVIxIDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBgU3luZXN0aGVzaWFgCiAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UsICAKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwNV9zcGV2X01SMiA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgCiAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UsICAKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwNV9zcGV2X01SMyA8LSBsbShgU3Bpcml0dWFsIEV2ZW50c2AgfiBDb3VudHJ5ICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYAogICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlLCAgCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDVfc3Bldl9NUjQgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIGBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAKICAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSwgIAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTA1X3NwZXZfTVI1IDwtIGxtKGBTcGlyaXR1YWwgRXZlbnRzYCB+IENvdW50cnkgKiBgU2Vuc2VkIHByZXNlbmNlYAogICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlLCAgCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDVfc3Bldl9NUjYgPC0gbG0oYFNwaXJpdHVhbCBFdmVudHNgIH4gQ291bnRyeSAqIGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAKICAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSwgIAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpgYGAKCmBgYHtyfQpyMTAzX2RzZV9NUjEgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBgU3luZXN0aGVzaWFgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTAzX2RzZV9NUjIgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDNfZHNlX01SMyA8LSBsbShgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChhKWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDNfZHNlX01SNCA8LSBsbShgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IGBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDNfZHNlX01SNSA8LSBsbShgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IGBTZW5zZWQgcHJlc2VuY2VgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTAzX2RzZV9NUjYgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYilgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQoKcjEwNF9kc2VfTVIxIDwtIGxtKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgIH4gQ291bnRyeSAqIGBTeW5lc3RoZXNpYWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDRfZHNlX01SMiA8LSBsbShgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IENvdW50cnkgKiBgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAsCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDRfZHNlX01SMyA8LSBsbShgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IENvdW50cnkgKiBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSlgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTA0X2RzZV9NUjQgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBDb3VudHJ5ICogYEltYWdpbmF0aXZlIGludm9sdmVtZW50YCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwNF9kc2VfTVI1IDwtIGxtKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgIH4gQ291bnRyeSAqIGBTZW5zZWQgcHJlc2VuY2VgLAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTA0X2RzZV9NUjYgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBDb3VudHJ5ICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYCwKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKCnIxMDVfZHNlX01SMSA8LSBsbShgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IENvdW50cnkgKiBgU3luZXN0aGVzaWFgCiAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UsICAKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwNV9kc2VfTVIyIDwtIGxtKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgIH4gQ291bnRyeSAqIGBBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlYAogICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlLCAgCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCnIxMDVfZHNlX01SMyA8LSBsbShgRGFpbHkgU3Bpcml0dWFsIEV4cGVyaWVuY2VzYCB+IENvdW50cnkgKiBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSlgCiAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UsICAKICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDNfYWJzX3N1YnNjYWxlcykKcjEwNV9kc2VfTVI0IDwtIGxtKGBEYWlseSBTcGlyaXR1YWwgRXhwZXJpZW5jZXNgIH4gQ291bnRyeSAqIGBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAKICAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSwgIAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTA1X2RzZV9NUjUgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBDb3VudHJ5ICogYFNlbnNlZCBwcmVzZW5jZWAKICAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZSwgIAogICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkM19hYnNfc3Vic2NhbGVzKQpyMTA1X2RzZV9NUjYgPC0gbG0oYERhaWx5IFNwaXJpdHVhbCBFeHBlcmllbmNlc2AgfiBDb3VudHJ5ICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYAogICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlLCAgCiAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQzX2Fic19zdWJzY2FsZXMpCmBgYAoKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zMzJfc3Vic2NhbGVzIDwtIHN0YXJnYXplcigKICByMTAzX3NwZXZfTVIxLCByMTAzX3NwZXZfTVIyLCByMTAzX3NwZXZfTVIzLCByMTAzX3NwZXZfTVI0LCByMTAzX3NwZXZfTVI1LCByMTAzX3NwZXZfTVI2LCAgCiAgcjEwNF9zcGV2X01SMSwgcjEwNF9zcGV2X01SMiwgcjEwNF9zcGV2X01SMywgcjEwNF9zcGV2X01SNCwgcjEwNF9zcGV2X01SNSwgcjEwNF9zcGV2X01SNiwgIAogIHIxMDVfc3Bldl9NUjEsIHIxMDVfc3Bldl9NUjIsIHIxMDVfc3Bldl9NUjMsIHIxMDVfc3Bldl9NUjQsIHIxMDVfc3Bldl9NUjUsIHIxMDVfc3Bldl9NUjYsICAKICByMTAzX2RzZV9NUjEsIHIxMDNfZHNlX01SMiwgcjEwM19kc2VfTVIzLCByMTAzX2RzZV9NUjQsIHIxMDNfZHNlX01SNSwgcjEwM19kc2VfTVI2LCAgCiAgcjEwNF9kc2VfTVIxLCByMTA0X2RzZV9NUjIsIHIxMDRfZHNlX01SMywgcjEwNF9kc2VfTVI0LCByMTA0X2RzZV9NUjUsIHIxMDRfZHNlX01SNiwgIAogIHIxMDVfZHNlX01SMSwgcjEwNV9kc2VfTVIyLCByMTA1X2RzZV9NUjMsIHIxMDVfZHNlX01SNCwgcjEwNV9kc2VfTVI1LCByMTA1X2RzZV9NUjYsICAKICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXmBTeW5lc3RoZXNpYWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyBcXChhXFwpYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gU2Vuc2VkIHByZXNlbmNlYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGJcXClgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICMgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgICAgICAgICAgICAgICAgICAgICAgZGVwLnZhci5jYXB0aW9uID0gIiIsCiAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpCgpjYXQoc3ViX2ludGVyYWN0X2Z1bih0YWJsZV9zMzJfc3Vic2NhbGVzKSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzJfc3Vic2NhbGVzLmh0bWwiKQpgYGAKCmBgYHtyfQojIGh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzJfc3Vic2NhbGVzLmh0bWwiKQpgYGAKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zMzJfc3Vic2NhbGVzX01SMSA8LSBzdGFyZ2F6ZXIocjEwM19zcGV2X01SMSwgcjEwNF9zcGV2X01SMSwgcjEwNV9zcGV2X01SMSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTAzX2RzZV9NUjEsIHIxMDRfZHNlX01SMSwgcjEwNV9kc2VfTVIxLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjaSA9IFQsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzLmV4dHJhID0gMTAwMCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeU3luZXN0aGVzaWEkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgXFwoYVxcKWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBTZW5zZWQgcHJlc2VuY2VgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyBcXChiXFwpYCQiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICMgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczMyX3N1YnNjYWxlc19NUjEpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MzMl9zdWJzY2FsZXNfTVIxLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczMyX3N1YnNjYWxlc19NUjEuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3MzMl9zdWJzY2FsZXNfTVIyIDwtIHN0YXJnYXplcihyMTAzX3NwZXZfTVIyLCByMTA0X3NwZXZfTVIyLCByMTA1X3NwZXZfTVIyLCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMDNfZHNlX01SMiwgcjEwNF9kc2VfTVIyLCByMTA1X2RzZV9NUjIsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5TeW5lc3RoZXNpYSQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyBcXChhXFwpYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEltYWdpbmF0aXZlIGludm9sdmVtZW50YCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFNlbnNlZCBwcmVzZW5jZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGJcXClgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpCgpjYXQoc3ViX2ludGVyYWN0X2Z1bih0YWJsZV9zMzJfc3Vic2NhbGVzX01SMiksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczMyX3N1YnNjYWxlc19NUjIuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzJfc3Vic2NhbGVzX01SMi5odG1sIikKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczMyX3N1YnNjYWxlc19NUjMgPC0gc3RhcmdhemVyKHIxMDNfc3Bldl9NUjMsIHIxMDRfc3Bldl9NUjMsIHIxMDVfc3Bldl9NUjMsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcjEwM19kc2VfTVIzLCByMTA0X2RzZV9NUjMsIHIxMDVfZHNlX01SMywgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcmVwb3J0ID0gYygidmNzcCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXlN5bmVzdGhlc2lhJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGFcXClgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gU2Vuc2VkIHByZXNlbmNlYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgXFwoYlxcKWAkIiksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVwLnZhci5jYXB0aW9uID0gIiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzaW5nbGUucm93ID0gVCkKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3MzMl9zdWJzY2FsZXNfTVIzKSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzJfc3Vic2NhbGVzX01SMy5odG1sIikKYGBgCgpgYGB7cn0KaHRtbHRvb2xzOjppbmNsdWRlSFRNTCgiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MzMl9zdWJzY2FsZXNfTVIzLmh0bWwiKQpgYGAKCmBgYHtyLCByZXN1bHRzID0gImhpZGUifQp0YWJsZV9zMzJfc3Vic2NhbGVzX01SNCA8LSBzdGFyZ2F6ZXIocjEwM19zcGV2X01SNCwgcjEwNF9zcGV2X01SNCwgcjEwNV9zcGV2X01SNCwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTAzX2RzZV9NUjQsIHIxMDRfZHNlX01SNCwgcjEwNV9kc2VfTVI0LCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHR5cGUgPSAiaHRtbCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjaSA9IFQsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByZXBvcnQgPSBjKCJ2Y3NwIiksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMgPSAyLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzLmV4dHJhID0gMTAwMCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG9taXQudGFibGUubGF5b3V0ID0gIm4iLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb3JkZXIgPSBjKCJeU3luZXN0aGVzaWEkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgXFwoYVxcKWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBTZW5zZWQgcHJlc2VuY2VgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyBcXChiXFwpYCQiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICMgZGVwLnZhci5sYWJlbHMuaW5jbHVkZSA9IEYsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZXAudmFyLmNhcHRpb24gPSAiIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNpbmdsZS5yb3cgPSBUKQoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczMyX3N1YnNjYWxlc19NUjQpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MzMl9zdWJzY2FsZXNfTVI0Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczMyX3N1YnNjYWxlc19NUjQuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3MzMl9zdWJzY2FsZXNfTVI1IDwtIHN0YXJnYXplcihyMTAzX3NwZXZfTVI1LCByMTA0X3NwZXZfTVI1LCByMTA1X3NwZXZfTVI1LCAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMDNfZHNlX01SNSwgcjEwNF9kc2VfTVI1LCByMTA1X2RzZV9NUjUsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5TeW5lc3RoZXNpYSQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyBcXChhXFwpYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEltYWdpbmF0aXZlIGludm9sdmVtZW50YCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFNlbnNlZCBwcmVzZW5jZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGJcXClgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpCgpjYXQoc3ViX2ludGVyYWN0X2Z1bih0YWJsZV9zMzJfc3Vic2NhbGVzX01SNSksIAogICAgZmlsZSA9ICIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczMyX3N1YnNjYWxlc19NUjUuaHRtbCIpCmBgYAoKYGBge3J9Cmh0bWx0b29sczo6aW5jbHVkZUhUTUwoIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzJfc3Vic2NhbGVzX01SNS5odG1sIikKYGBgCgpgYGB7ciwgcmVzdWx0cyA9ICJoaWRlIn0KdGFibGVfczMyX3N1YnNjYWxlc19NUjYgPC0gc3RhcmdhemVyKHIxMDNfc3Bldl9NUjYsIHIxMDRfc3Bldl9NUjYsIHIxMDVfc3Bldl9NUjYsIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcjEwM19kc2VfTVI2LCByMTA0X2RzZV9NUjYsIHIxMDVfZHNlX01SNiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICB0eXBlID0gImh0bWwiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY2kgPSBULAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcmVwb3J0ID0gYygidmNzcCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGlnaXRzID0gMiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cy5leHRyYSA9IDEwMDAsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvbWl0LnRhYmxlLmxheW91dCA9ICJuIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG9yZGVyID0gYygiXlN5bmVzdGhlc2lhJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGFcXClgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gU2Vuc2VkIHByZXNlbmNlYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgXFwoYlxcKWAkIiksCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAjIGRlcC52YXIubGFiZWxzLmluY2x1ZGUgPSBGLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVwLnZhci5jYXB0aW9uID0gIiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzaW5nbGUucm93ID0gVCkKCmNhdChzdWJfaW50ZXJhY3RfZnVuKHRhYmxlX3MzMl9zdWJzY2FsZXNfTVI2KSwgCiAgICBmaWxlID0gIi4vc3RhcmdhemVyX3RhYmxlcy90YWJsZV9zMzJfc3Vic2NhbGVzX01SNi5odG1sIikKYGBgCgpgYGB7cn0KaHRtbHRvb2xzOjppbmNsdWRlSFRNTCgiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3MzMl9zdWJzY2FsZXNfTVI2Lmh0bWwiKQpgYGAKCiMjIFN0dWR5IDQKCiMjIyBSZWxpYWJpbGl0eQoKYGBge3J9CiMgcmVsaWFiaWxpdHkKYmluZF9yb3dzKE1SMSA9IHN1bW1hcnkoYWxwaGEoZF9hbGxfYWJzICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJvd25hbWVzX3RvX2NvbHVtbigic3ViamVjdF9pZCIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZ3JlcGwoInM0XyIsIHN1YmplY3RfaWQpKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmplY3RfaWQiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzZWxlY3QoZF9hbGxfYWxsX3NjYWxlcyAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGZhY3RvciA9PSAiTVIxIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHB1bGwocXVlc3Rpb24pKSkpLAogICAgICAgICAgTVIyID0gc3VtbWFyeShhbHBoYShkX2FsbF9hYnMgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqZWN0X2lkIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihncmVwbCgiczRfIiwgc3ViamVjdF9pZCkpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNlbGVjdChkX2FsbF9hbGxfc2NhbGVzICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZmFjdG9yID09ICJNUjIiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcHVsbChxdWVzdGlvbikpKSksCiAgICAgICAgICBNUjMgPSBzdW1tYXJ5KGFscGhhKGRfYWxsX2FicyAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByb3duYW1lc190b19jb2x1bW4oInN1YmplY3RfaWQiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGdyZXBsKCJzNF8iLCBzdWJqZWN0X2lkKSkgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqZWN0X2lkIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2VsZWN0KGRfYWxsX2FsbF9zY2FsZXMgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihmYWN0b3IgPT0gIk1SMyIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHF1ZXN0aW9uKSkpKSwKICAgICAgICAgIE1SNCA9IHN1bW1hcnkoYWxwaGEoZF9hbGxfYWJzICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJvd25hbWVzX3RvX2NvbHVtbigic3ViamVjdF9pZCIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZ3JlcGwoInM0XyIsIHN1YmplY3RfaWQpKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBjb2x1bW5fdG9fcm93bmFtZXMoInN1YmplY3RfaWQiKSAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzZWxlY3QoZF9hbGxfYWxsX3NjYWxlcyAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGZhY3RvciA9PSAiTVI0IikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHB1bGwocXVlc3Rpb24pKSkpLAogICAgICAgICAgTVI1ID0gc3VtbWFyeShhbHBoYShkX2FsbF9hYnMgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqZWN0X2lkIikgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihncmVwbCgiczRfIiwgc3ViamVjdF9pZCkpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbHVtbl90b19yb3duYW1lcygic3ViamVjdF9pZCIpICU+JQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNlbGVjdChkX2FsbF9hbGxfc2NhbGVzICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoZmFjdG9yID09ICJNUjUiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgcHVsbChxdWVzdGlvbikpKSksCiAgICAgICAgICBNUjYgPSBzdW1tYXJ5KGFscGhhKGRfYWxsX2FicyAlPiUKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByb3duYW1lc190b19jb2x1bW4oInN1YmplY3RfaWQiKSAlPiUgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKGdyZXBsKCJzNF8iLCBzdWJqZWN0X2lkKSkgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sdW1uX3RvX3Jvd25hbWVzKCJzdWJqZWN0X2lkIikgJT4lCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2VsZWN0KGRfYWxsX2FsbF9zY2FsZXMgJT4lIAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihmYWN0b3IgPT0gIk1SNiIpICU+JSAKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBwdWxsKHF1ZXN0aW9uKSkpKSkKCmBgYAoKCiMjIyBSZWxhdGlvbnNoaXBzIChhbmFsb2cgdG8gVGFibGVzIFM0MC1TNDEpCgpgYGB7cn0KZDRfYWJzX3N1YnNjYWxlcyA8LSBkX2FsbF9hYnMgJT4lCiAgcm93bmFtZXNfdG9fY29sdW1uKCJzdWJqZWN0X2lkIikgJT4lIAogIGZpbHRlcihncmVwbCgiczRfIiwgc3ViamVjdF9pZCkpICU+JQogIGdhdGhlcihxdWVzdGlvbiwgcmVzcG9uc2UsIC1zdWJqZWN0X2lkKSAlPiUKICBsZWZ0X2pvaW4oZF9hbGxfYWxsX3NjYWxlcyAlPiUgZGlzdGluY3QocXVlc3Rpb24sIGZhY3RvcikpICU+JSAKICBmaWx0ZXIoIWlzLm5hKGZhY3RvcikpICU+JQogIG11dGF0ZShmYWN0b3JsYWIgPSByZWNvZGVfZmFjdG9yKGZhY3RvciwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiTVIxIiA9ICJTeW5lc3RoZXNpYSIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIk1SMiIgPSAiQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZSIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIk1SMyIgPSAiQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSkiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJNUjQiID0gIkltYWdpbmF0aXZlIGludm9sdmVtZW50IiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiTVI1IiA9ICJTZW5zZWQgcHJlc2VuY2UiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJNUjYiID0gIkFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpIikpICU+JSAKICBncm91cF9ieShzdWJqZWN0X2lkLCBmYWN0b3IsIGZhY3RvcmxhYikgJT4lCiAgc3VtbWFyaXNlKHNjb3JlID0gbWVhbihyZXNwb25zZSwgbmEucm0gPSBUKSkgJT4lCiAgdW5ncm91cCgpICU+JQogIG11dGF0ZShzdWJqZWN0X2lkID0gYXMubnVtZXJpYyhnc3ViKCJzNF8iLCAiIiwgc3ViamVjdF9pZCkpKSAlPiUKICBsZWZ0X2pvaW4oZDQgJT4lIGRpc3RpbmN0KHN1YmplY3RfaWQsIGNvdW50cnkpKSAlPiUKICBncm91cF9ieShjb3VudHJ5LCBmYWN0b3IsIGZhY3RvcmxhYikgJT4lCiAgbXV0YXRlKHNjb3JlID0gc2NhbGUoc2NvcmUpKSAlPiUKICB1bmdyb3VwKCkgJT4lCiAgc2VsZWN0KC1jb3VudHJ5LCAtZmFjdG9yKSAlPiUKICBzcHJlYWQoZmFjdG9ybGFiLCBzY29yZSkgJT4lCiAgbXV0YXRlX2FsbChhcy5udW1lcmljKSAlPiUKICBsZWZ0X2pvaW4oZDRfZm9ydGFiX2xvbmdfc3Bpcml0KQpgYGAKCiMjIyBBbmFsb2cgdG8gVGFibGUgUzQwCgpgYGB7cn0KcjEwNV9zcGlyaXRfTVIxIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIFN5bmVzdGhlc2lhCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTA4X3NwaXJpdF9NUjEgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIFN5bmVzdGhlc2lhCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTA5X3NwaXJpdF9NUjEgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogU3luZXN0aGVzaWEKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMTBfc3Bpcml0X01SMSA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFNjYWxlYCAqIFN5bmVzdGhlc2lhCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTExX3NwaXJpdF9NUjEgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogU3luZXN0aGVzaWEKICAgICAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMTJfc3Bpcml0X01SMSA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFNjYWxlYCAqIFN5bmVzdGhlc2lhCiAgICAgICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCmBgYAoKYGBge3J9CnIxMDVfc3Bpcml0X01SMiA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMDhfc3Bpcml0X01SMiA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTA5X3NwaXJpdF9NUjIgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogYEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTEwX3NwaXJpdF9NUjIgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBTY2FsZWAgKiBgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMTFfc3Bpcml0X01SMiA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAKICAgICAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMTJfc3Bpcml0X01SMiA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFNjYWxlYCAqIGBBZXN0aGV0aWMgaW52b2x2ZW1lbnQgaW4gbmF0dXJlYAogICAgICAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZQogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQpgYGAKCmBgYHtyfQpyMTA1X3NwaXJpdF9NUjMgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjEwOF9zcGlyaXRfTVIzIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYSlgCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTA5X3NwaXJpdF9NUjMgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjExMF9zcGlyaXRfTVIzIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgU2NhbGVgICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGEpYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjExMV9zcGlyaXRfTVIzIDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChhKWAKICAgICAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMTJfc3Bpcml0X01SMyA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFNjYWxlYCAqIGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChhKWAKICAgICAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKYGBgCgpgYGB7cn0KcjEwNV9zcGlyaXRfTVI0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIGBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMDhfc3Bpcml0X01SNCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYEltYWdpbmF0aXZlIGludm9sdmVtZW50YAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjEwOV9zcGlyaXRfTVI0IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIGBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMTBfc3Bpcml0X01SNCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFNjYWxlYCAqIGBJbWFnaW5hdGl2ZSBpbnZvbHZlbWVudGAKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMTFfc3Bpcml0X01SNCA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFZpZ25ldHRlc2AgKiBgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgCiAgICAgICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTEyX3NwaXJpdF9NUjQgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBTY2FsZWAgKiBgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgCiAgICAgICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCmBgYAoKYGBge3J9CnIxMDVfc3Bpcml0X01SNSA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBgU2Vuc2VkIHByZXNlbmNlYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjEwOF9zcGlyaXRfTVI1IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgU2Vuc2VkIHByZXNlbmNlYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjEwOV9zcGlyaXRfTVI1IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIGBTZW5zZWQgcHJlc2VuY2VgCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTEwX3NwaXJpdF9NUjUgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBTY2FsZWAgKiBgU2Vuc2VkIHByZXNlbmNlYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjExMV9zcGlyaXRfTVI1IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIGBTZW5zZWQgcHJlc2VuY2VgCiAgICAgICAgICAgICAgICAgICAgICAgICsgR2VuZGVyICsgQWdlCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTEyX3NwaXJpdF9NUjUgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBTY2FsZWAgKiBgU2Vuc2VkIHByZXNlbmNlYAogICAgICAgICAgICAgICAgICAgICAgICArIEdlbmRlciArIEFnZQogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQpgYGAKCmBgYHtyfQpyMTA1X3NwaXJpdF9NUjYgPC0gbG1lcihTY29yZSB+IFNjYWxlICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjEwOF9zcGlyaXRfTVI2IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyAoYilgCiAgICAgICAgICAgICAgICAgICAgICAgICsgKDEgfCBzdWJqZWN0X2lkKSwKICAgICAgICAgICAgICAgICAgICAgICAgY29udHJvbCA9IGxtZXJDb250cm9sKG9wdGltaXplciA9ICJib2J5cWEiKSwKICAgICAgICAgICAgICAgICAgICAgICAgZGF0YSA9IGQ0X2Fic19zdWJzY2FsZXMpCgpyMTA5X3NwaXJpdF9NUjYgPC0gbG1lcihTY29yZSB+IFNjYWxlICogQ291bnRyeSAqIGBQb3Jvc2l0eSBWaWduZXR0ZXNgICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjExMF9zcGlyaXRfTVI2IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgU2NhbGVgICogYEFsdGVyZWQgc3RhdGVzIG9mIGNvbnNjaW91c25lc3MgKGIpYAogICAgICAgICAgICAgICAgICAgICAgICArICgxIHwgc3ViamVjdF9pZCksCiAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRyb2wgPSBsbWVyQ29udHJvbChvcHRpbWl6ZXIgPSAiYm9ieXFhIiksCiAgICAgICAgICAgICAgICAgICAgICAgIGRhdGEgPSBkNF9hYnNfc3Vic2NhbGVzKQoKcjExMV9zcGlyaXRfTVI2IDwtIGxtZXIoU2NvcmUgfiBTY2FsZSAqIENvdW50cnkgKiBgUG9yb3NpdHkgVmlnbmV0dGVzYCAqIGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAKICAgICAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKCnIxMTJfc3Bpcml0X01SNiA8LSBsbWVyKFNjb3JlIH4gU2NhbGUgKiBDb3VudHJ5ICogYFBvcm9zaXR5IFNjYWxlYCAqIGBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIChiKWAKICAgICAgICAgICAgICAgICAgICAgICAgKyBHZW5kZXIgKyBBZ2UKICAgICAgICAgICAgICAgICAgICAgICAgKyAoMSB8IHN1YmplY3RfaWQpLAogICAgICAgICAgICAgICAgICAgICAgICBjb250cm9sID0gbG1lckNvbnRyb2wob3B0aW1pemVyID0gImJvYnlxYSIpLAogICAgICAgICAgICAgICAgICAgICAgICBkYXRhID0gZDRfYWJzX3N1YnNjYWxlcykKYGBgCgoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVIxIDwtIHN0YXJnYXplcihyMTA1X3NwaXJpdF9NUjEsIHIxMDhfc3Bpcml0X01SMSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTA5X3NwaXJpdF9NUjEsIHIxMTBfc3Bpcml0X01SMSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMTFfc3Bpcml0X01SMSwgcjExMl9zcGlyaXRfTVIxLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5TeW5lc3RoZXNpYSQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFZpZ25ldHRlc2AkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBTY2FsZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOlN5bmVzdGhlc2lhJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgU2NhbGVgOlN5bmVzdGhlc2lhJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpIAoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQwczQxX3N1YnNjYWxlc19NUjEpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVIxLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQwczQxX3N1YnNjYWxlc19NUjEuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVIyIDwtIHN0YXJnYXplcihyMTA1X3NwaXJpdF9NUjIsIHIxMDhfc3Bpcml0X01SMiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTA5X3NwaXJpdF9NUjIsIHIxMTBfc3Bpcml0X01SMiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMTFfc3Bpcml0X01SMiwgcjExMl9zcGlyaXRfTVIyLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgU2NhbGVgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgVmlnbmV0dGVzYDpgQWVzdGhldGljIGludm9sdmVtZW50IGluIG5hdHVyZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBTY2FsZWA6YEFlc3RoZXRpYyBpbnZvbHZlbWVudCBpbiBuYXR1cmVgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpIAoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQwczQxX3N1YnNjYWxlc19NUjIpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVIyLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQwczQxX3N1YnNjYWxlc19NUjIuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVIzIDwtIHN0YXJnYXplcihyMTA1X3NwaXJpdF9NUjMsIHIxMDhfc3Bpcml0X01SMywgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTA5X3NwaXJpdF9NUjMsIHIxMTBfc3Bpcml0X01SMywKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMTFfc3Bpcml0X01SMywgcjExMl9zcGlyaXRfTVIzLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyBcXChhXFwpYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFZpZ25ldHRlc2AkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBTY2FsZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGFcXClgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgU2NhbGVgOmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGFcXClgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpIAoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQwczQxX3N1YnNjYWxlc19NUjMpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVIzLmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQwczQxX3N1YnNjYWxlc19NUjMuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVI0IDwtIHN0YXJnYXplcihyMTA1X3NwaXJpdF9NUjQsIHIxMDhfc3Bpcml0X01SNCwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTA5X3NwaXJpdF9NUjQsIHIxMTBfc3Bpcml0X01SNCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMTFfc3Bpcml0X01SNCwgcjExMl9zcGlyaXRfTVI0LAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgVmlnbmV0dGVzYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFNjYWxlYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFZpZ25ldHRlc2A6YEltYWdpbmF0aXZlIGludm9sdmVtZW50YCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFNjYWxlYDpgSW1hZ2luYXRpdmUgaW52b2x2ZW1lbnRgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpIAoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQwczQxX3N1YnNjYWxlc19NUjQpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVI0Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQwczQxX3N1YnNjYWxlc19NUjQuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVI1IDwtIHN0YXJnYXplcihyMTA1X3NwaXJpdF9NUjUsIHIxMDhfc3Bpcml0X01SNSwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTA5X3NwaXJpdF9NUjUsIHIxMTBfc3Bpcml0X01SNSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMTFfc3Bpcml0X01SNSwgcjExMl9zcGlyaXRfTVI1LAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gU2Vuc2VkIHByZXNlbmNlYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFZpZ25ldHRlc2AkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBTY2FsZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBTZW5zZWQgcHJlc2VuY2VgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgU2NhbGVgOmBTZW5zZWQgcHJlc2VuY2VgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpIAoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQwczQxX3N1YnNjYWxlc19NUjUpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVI1Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQwczQxX3N1YnNjYWxlc19NUjUuaHRtbCIpCmBgYAoKYGBge3IsIHJlc3VsdHMgPSAiaGlkZSJ9CnRhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVI2IDwtIHN0YXJnYXplcihyMTA1X3NwaXJpdF9NUjYsIHIxMDhfc3Bpcml0X01SNiwgCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICByMTA5X3NwaXJpdF9NUjYsIHIxMTBfc3Bpcml0X01SNiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHIxMTFfc3Bpcml0X01SNiwgcjExMl9zcGlyaXRfTVI2LAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgdHlwZSA9ICJodG1sIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNpID0gVCwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHJlcG9ydCA9IGMoInZjc3AiKSwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRpZ2l0cyA9IDIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkaWdpdHMuZXh0cmEgPSAxMDAwLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgb21pdC50YWJsZS5sYXlvdXQgPSAibiIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBvcmRlciA9IGMoIl5gQWx0ZXJlZCBzdGF0ZXMgb2YgY29uc2Npb3VzbmVzcyBcXChiXFwpYCQiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJeYFBvcm9zaXR5IFZpZ25ldHRlc2AkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBTY2FsZWAkIiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiXmBQb3Jvc2l0eSBWaWduZXR0ZXNgOmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGJcXClgJCIsCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIl5gUG9yb3NpdHkgU2NhbGVgOmBBbHRlcmVkIHN0YXRlcyBvZiBjb25zY2lvdXNuZXNzIFxcKGJcXClgJCIpLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIyBkZXAudmFyLmxhYmVscy5pbmNsdWRlID0gRiwKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlcC52YXIuY2FwdGlvbiA9ICIiLAogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2luZ2xlLnJvdyA9IFQpIAoKY2F0KHN1Yl9pbnRlcmFjdF9mdW4odGFibGVfczQwczQxX3N1YnNjYWxlc19NUjYpLCAKICAgIGZpbGUgPSAiLi9zdGFyZ2F6ZXJfdGFibGVzL3RhYmxlX3M0MHM0MV9zdWJzY2FsZXNfTVI2Lmh0bWwiKQpgYGAKCmBgYHtyfQpodG1sdG9vbHM6OmluY2x1ZGVIVE1MKCIuL3N0YXJnYXplcl90YWJsZXMvdGFibGVfczQwczQxX3N1YnNjYWxlc19NUjYuaHRtbCIpCmBgYAoKCgoKCgo=